raw-angle from scale-rotated-ellipse

Time bar (total: 2.5min)

start0.0ms (0%)

Memory
0.2MiB live, 0.2MiB allocated

analyze1.4s (0.9%)

Memory
16.7MiB live, 1 616.4MiB allocated
Algorithm
1×search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.8%0.2%0%0%0%0
0%0%99.8%0.2%0%0%0%1
0%0%99.8%0.2%0%0%0%2
0%0%99.8%0.2%0%0%0%3
0%0%99.8%0.2%0%0%0%4
0%0%99.8%0.2%0%0%0%5
0%0%99.8%0.2%0%0%0%6
0%0%99.8%0.2%0%0%0%7
0%0%99.8%0.2%0%0%0%8
0%0%99.8%0.2%0%0%0%9
0%0%99.8%0.2%0%0%0%10
0.6%0.6%99.2%0.2%0%0%0%11
0.7%0.7%99.1%0.2%0%0%0%12
Compiler

Compiled 171 to 47 computations (72.5% saved)

sample12.6s (8.4%)

Memory
254.4MiB live, 13 386.7MiB allocated
Samples
5.0s3 496×1valid
2.6s1 493×2valid
1.3s3 110×0valid
1.2s2 448×1exit
532.0ms34×4exit
369.0ms157×3valid
102.0ms12×3exit
84.0ms6×5exit
22.0ms11×2exit
Precisions
Click to see histograms. Total time spent on operations: 10.5s
ival-sin: 2.5s (23.9% of total)
ival-pow2: 1.9s (17.7% of total)
ival-mult: 1.6s (14.9% of total)
ival-cos: 1.5s (14.2% of total)
ival-div: 1.3s (12.3% of total)
adjust: 701.0ms (6.7% of total)
ival-sub: 475.0ms (4.5% of total)
ival-add: 239.0ms (2.3% of total)
ival-sqrt: 158.0ms (1.5% of total)
ival-atan: 119.0ms (1.1% of total)
ival-pi: 72.0ms (0.7% of total)
exact: 14.0ms (0.1% of total)
ival-true: 10.0ms (0.1% of total)
ival-assert: 5.0ms (0% of total)
Bogosity

explain2.5s (1.7%)

Memory
10.8MiB live, 2 586.5MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1110-0-(/.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))
900-0-(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
900-0-(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
880-0-(-.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)))))
581(-6.892192761122417e+114 -6.225843411533248e-132 4.2979051163154557e-153 1.0334575057491605e+122 -2.1060333207413655e+289)0-(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))))
390-0-(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
380-3(1.0882609902412694e-173 -7.823695203973056e-159 1.3803657608122004e+154 -291584903089.9015 4.168059863578549e-242)(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
320-1(3.614305548159189e-208 -2.578672984143284e-156 -7.4510117127249e+290 8.690590570778234e-237 -2.5169028736768426e-155)(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)
280-0-(-.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))
281(6.740587769902226e-268 2.8593055169267355e-142 2.9331203540837373e-201 -3.072869693928608e+47 -4.328227241790453e-210)0-(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
280-0-(-.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))
270-1(3.614305548159189e-208 -2.578672984143284e-156 -7.4510117127249e+290 8.690590570778234e-237 -2.5169028736768426e-155)(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)
160-0-(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
130-0-(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
100-0-(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
51(-1.3422000273223683e-201 1.9584998493249065e-81 4.760153346333657e-197 1.160339314888105e+110 4.325209896518231e-258)5(-3.738466288409615e-249 -1.962997992161588e-217 -7.398810578499703e-8 -7.172864615025293e+281 5.717984857606018e-37)(*.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)))
00-0-x-scale
00-0-(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
00-0-(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
00-0-(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
00-0-(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
00-0-(pow.f64 b #s(literal 2 binary64))
00-0-(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
00-0-(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
00-0-(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
00-0-(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
00-0-#s(literal 180 binary64)
00-0-(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
00-0-angle
00-0-#s(literal 2 binary64)
00-0-(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))
00-0-(*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
00-0-b
00-0-(/.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))
00-0-a
00-0-(+.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)))
00-0-(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
00-0-(pow.f64 a #s(literal 2 binary64))
00-0-(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
00-0-(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)))
00-0-(PI.f64)
00-0-(/.f64 angle #s(literal 180 binary64))
00-0-(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
00-0-(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))
00-0-y-scale
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
cos.f64(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))sensitivity900
sin.f64(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))sensitivity900
-.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)))))nan-rescue610
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow68
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow78
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow59
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow55
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow25
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow71
↳(-.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))overflow118
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow20
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow69
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow65
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow79
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow62
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow78
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow62
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow20
↳(+.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)))overflow161
↳(-.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))overflow118
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow68
↳(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))overflow161
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow65
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow101
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow55
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow79
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow101
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow59
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow55
↳(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))))overflow118
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow54
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow25
↳(pow.f64 b #s(literal 2 binary64))overflow55
↳(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))overflow102
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow71
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow69
↳(pow.f64 a #s(literal 2 binary64))overflow59
sqrt.f64(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))))oflow-rescue430
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow62
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow78
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow62
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow20
↳(+.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)))overflow161
↳(-.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))overflow118
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow68
↳(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))overflow161
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow65
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow101
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow55
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow79
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow101
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow59
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow55
↳(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))))overflow118
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow54
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow25
↳(pow.f64 b #s(literal 2 binary64))overflow55
↳(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))overflow102
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow71
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow69
↳(pow.f64 a #s(literal 2 binary64))overflow59
*.f64(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))n*o390
/.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))o/o380
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow62
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow62
↳(-.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))overflow118
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow40
↳(+.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)))overflow161
↳(-.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))overflow118
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow136
↳(-.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)))))overflow65
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow156
↳(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))overflow161
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow130
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow101
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow55
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow158
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow101
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow118
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow110
↳(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))))overflow118
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow54
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow50
↳(pow.f64 b #s(literal 2 binary64))overflow55
↳(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))overflow102
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow142
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow138
↳(pow.f64 a #s(literal 2 binary64))overflow59
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow62
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow101
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow54
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow62
↳(pow.f64 b #s(literal 2 binary64))overflow55
↳(pow.f64 a #s(literal 2 binary64))overflow59
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow101
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow55
/.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))u/u300
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow39
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow39
↳(-.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))underflow23
↳(+.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)))underflow39
↳(-.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))underflow23
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)underflow120
↳(-.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)))))underflow66
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)underflow114
↳(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))underflow39
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow78
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow21
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow45
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow74
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow21
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow138
↳(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow86
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow134
↳(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))))underflow23
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)underflow46
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow230
↳(pow.f64 b #s(literal 2 binary64))underflow67
↳(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))underflow80
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow62
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow206
↳(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow62
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow80
↳(pow.f64 a #s(literal 2 binary64))underflow69
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow39
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow21
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)underflow46
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow39
↳(pow.f64 b #s(literal 2 binary64))underflow67
↳(pow.f64 a #s(literal 2 binary64))underflow69
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow21
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow45
-.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))nan-rescue280
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow68
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow55
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow71
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow20
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow69
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow78
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow59
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow25
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow65
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow79
-.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))nan-rescue280
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow78
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow59
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow25
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow65
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow79
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow68
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow55
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow71
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow20
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow69
-.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)))))cancellation270
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)o/n240
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow79
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow59
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow25
/.f64(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)o/n210
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow62
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow101
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow101
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow62
↳(pow.f64 b #s(literal 2 binary64))overflow55
↳(pow.f64 a #s(literal 2 binary64))overflow59
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)o/n190
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow55
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow71
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow20
/.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)o/n170
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow62
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow101
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow62
↳(pow.f64 b #s(literal 2 binary64))overflow55
↳(pow.f64 a #s(literal 2 binary64))overflow59
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow101
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow55
sqrt.f64(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))))uflow-rescue160
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow39
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)underflow57
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow39
↳(+.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)))underflow39
↳(-.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))underflow23
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)underflow60
↳(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))underflow39
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow39
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow21
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow45
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow37
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow21
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow69
↳(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow43
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow67
↳(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))))underflow23
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)underflow46
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow115
↳(pow.f64 b #s(literal 2 binary64))underflow67
↳(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))underflow80
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow31
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow103
↳(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow31
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow40
↳(pow.f64 a #s(literal 2 binary64))underflow69
/.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))u/n160
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow39
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow39
↳(-.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))underflow23
↳(+.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)))underflow39
↳(-.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))underflow23
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)underflow120
↳(-.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)))))underflow66
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)underflow114
↳(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))underflow39
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow78
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow21
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow45
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow74
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow21
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow138
↳(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow86
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow134
↳(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))))underflow23
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)underflow46
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow230
↳(pow.f64 b #s(literal 2 binary64))underflow67
↳(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))underflow80
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow62
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow206
↳(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow62
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow80
↳(pow.f64 a #s(literal 2 binary64))underflow69
/.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)o/n140
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow55
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow71
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow20
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow69
-.f64(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))nan-rescue130
↳(pow.f64 b #s(literal 2 binary64))overflow55
↳(pow.f64 a #s(literal 2 binary64))overflow59
/.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))o/n130
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow62
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow62
↳(-.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))overflow118
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow40
↳(+.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)))overflow161
↳(-.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))overflow118
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow136
↳(-.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)))))overflow65
↳(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow156
↳(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))overflow161
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow130
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow101
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow55
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow158
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow101
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow118
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow110
↳(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))))overflow118
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow54
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow50
↳(pow.f64 b #s(literal 2 binary64))overflow55
↳(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))overflow102
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow142
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow138
↳(pow.f64 a #s(literal 2 binary64))overflow59
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)u/n90
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow37
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow69
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow115
↳(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow31
/.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)o/n80
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow59
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow25
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow65
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow79
/.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))n/o80
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow62
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow101
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow54
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow62
↳(pow.f64 b #s(literal 2 binary64))overflow55
↳(pow.f64 a #s(literal 2 binary64))overflow59
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow101
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow55
/.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)u/n70
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow39
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow21
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow39
↳(pow.f64 b #s(literal 2 binary64))underflow67
↳(pow.f64 a #s(literal 2 binary64))underflow69
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow21
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow45
/.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))n/u60
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow39
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow21
↳(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)underflow46
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow39
↳(pow.f64 b #s(literal 2 binary64))underflow67
↳(pow.f64 a #s(literal 2 binary64))underflow69
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow21
↳(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow45
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)u/n50
↳(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow43
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow67
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow31
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow103
/.f64(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)u/n20
↳(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow39
↳(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow21
↳(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow21
↳(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow39
↳(pow.f64 b #s(literal 2 binary64))underflow67
↳(pow.f64 a #s(literal 2 binary64))underflow69
/.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)u/n20
↳(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow69
↳(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow115
↳(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow31
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow39
↳(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow37
/.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)u/n10
↳(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow43
↳(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow67
↳(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow31
↳(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow103
↳(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow40
*.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)))n*u10
Confusion
Predicted +Predicted -
+2170
-2613
Precision
0.8930041152263375
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+21700
-26013
Precision?
0.8930041152263375
Recall?
1.0
Freqs
test
numberfreq
013
151
256
372
437
517
66
74
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
384.0ms218×1valid
157.0ms112×2valid
58.0ms172×0valid
28.0ms10×3valid
Compiler

Compiled 3 184 to 139 computations (95.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 555.0ms
ival-sub: 153.0ms (27.6% of total)
ival-cos: 87.0ms (15.7% of total)
ival-pow2: 72.0ms (13% of total)
ival-sin: 67.0ms (12.1% of total)
ival-div: 58.0ms (10.4% of total)
ival-mult: 55.0ms (9.9% of total)
adjust: 30.0ms (5.4% of total)
ival-add: 13.0ms (2.3% of total)
ival-sqrt: 8.0ms (1.4% of total)
ival-atan: 6.0ms (1.1% of total)
ival-pi: 4.0ms (0.7% of total)
ival-true: 1.0ms (0.2% of total)
exact: 1.0ms (0.2% of total)
ival-assert: 0.0ms (0% of total)

preprocess219.0ms (0.1%)

Memory
14.3MiB live, 166.1MiB allocated
Algorithm
1×egg-herbie
Rules
15 944×lower-fma.f64
15 944×lower-fma.f32
6 670×lower-*.f32
6 652×lower-*.f64
2 794×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04403476
110793380
236363380
045169
083169
1134169
2325169
31333169
46383169
08185164
Stop Event
1×iter limit
1×node limit
1×iter limit
1×node limit
Calls
Call 1
Inputs
(*.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
(*.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 (/.f64 #s(literal 180 binary64) (PI.f64)) (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))))) (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))))))))
Symmetry

(abs b)

(abs a)

Compiler

Compiled 174 to 45 computations (74.1% saved)

eval0.0ms (0%)

Memory
0.3MiB live, 0.3MiB allocated
Compiler

Compiled 5 to 5 computations (0% saved)

prune1.0ms (0%)

Memory
1.9MiB live, 1.9MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶16.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)))
Compiler

Compiled 174 to 45 computations (74.1% saved)

simplify183.0ms (0.1%)

Memory
9.6MiB live, 165.0MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
cost-diff384
(/.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))
cost-diff6144
(pow.f64 a #s(literal 2 binary64))
cost-diff6144
(pow.f64 b #s(literal 2 binary64))
cost-diff7296
(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))))
Rules
15 944×lower-fma.f64
15 944×lower-fma.f32
6 670×lower-*.f32
6 652×lower-*.f64
2 794×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0451503
0831503
11341503
23251503
313331503
463831503
081851473
Stop Event
1×iter limit
1×node limit
1×iter limit
Calls
Call 1
Inputs
(*.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)))
#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))
(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 (-.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 (-.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 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.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))
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
a
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 angle #s(literal 180 binary64))
angle
(PI.f64)
#s(literal 2 binary64)
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
b
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 a (sin.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 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
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 (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)))
(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 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 #s(literal 2 binary64) (-.f64 (pow.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 #s(literal 2 binary64) (-.f64 (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)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #s(literal 2 binary64))
Outputs
(*.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 (/.f64 #s(literal 180 binary64) (PI.f64)) (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))))) (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))))))))
#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 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))))) (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))))))) (PI.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)))
(atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))))) (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 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))
(*.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))))) (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 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 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))))) (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 y-scale y-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 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 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)
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 y-scale 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 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) y-scale)
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a)
a
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))
(/.f64 angle #s(literal 180 binary64))
angle
(PI.f64)
#s(literal 2 binary64)
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64))
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b)
b
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))
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 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 x-scale 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 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) x-scale)
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a)
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64))
(*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))))
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))))
(hypot.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))))) (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))
(+.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 (pow.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))
(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 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))
(-.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))
(-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) a) #s(literal 2 binary64))) (*.f64 y-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))
(pow.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))))) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
(*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (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 b a) (+.f64 b a)) (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (/.f64 #s(literal 2 binary64) x-scale)))
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 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 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))) (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 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 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a)) (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))))
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
(*.f64 (*.f64 (-.f64 b a) #s(literal 2 binary64)) (+.f64 b a))
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
(*.f64 (-.f64 b a) (+.f64 b a))
(pow.f64 b #s(literal 2 binary64))
(*.f64 b b)
(pow.f64 a #s(literal 2 binary64))
(*.f64 a a)

localize427.0ms (0.3%)

Memory
2.8MiB live, 431.0MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy19.233132198223522
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy19.503406488205904
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy21.632598355351945
(-.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)))))
accuracy26.340025530972078
(/.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))
Samples
182.0ms109×1valid
75.0ms56×2valid
33.0ms86×0valid
12.0ms5×3valid
Compiler

Compiled 1 505 to 47 computations (96.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 260.0ms
ival-pow2: 80.0ms (30.8% of total)
ival-cos: 42.0ms (16.2% of total)
ival-sin: 34.0ms (13.1% of total)
ival-mult: 32.0ms (12.3% of total)
ival-div: 29.0ms (11.2% of total)
adjust: 18.0ms (6.9% of total)
ival-sub: 9.0ms (3.5% of total)
ival-add: 8.0ms (3.1% of total)
ival-sqrt: 4.0ms (1.5% of total)
ival-atan: 3.0ms (1.2% of total)
ival-pi: 2.0ms (0.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series273.0ms (0.2%)

Memory
8.1MiB live, 320.7MiB allocated
Counts
7 → 228
Calls
Call 1
Inputs
#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())
#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())
#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())
Outputs
#s(alt (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (taylor 0 b) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (taylor 0 b) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (taylor 0 b) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))) (taylor 0 b) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (taylor 0 b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (taylor 0 b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))))))) (taylor 0 b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow b 2) (- (+ (* -1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (taylor inf b) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (taylor inf b) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (taylor inf b) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (taylor inf b) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor inf b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor inf b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor inf b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor inf b) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor inf b) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor inf b) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (taylor inf b) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (taylor -inf b) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (taylor -inf b) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (taylor -inf b) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (taylor -inf b) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor -inf b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor -inf b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor -inf b) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor -inf b) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor -inf b) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor -inf b) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (taylor -inf b) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (taylor 0 a) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (taylor 0 a) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (taylor 0 a) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))) (taylor 0 a) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor 0 a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (taylor 0 a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))))))) (taylor 0 a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow a 2) (- (+ (* -1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (taylor inf a) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (taylor inf a) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (taylor inf a) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (taylor inf a) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor inf a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor inf a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor inf a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor inf a) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor inf a) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor inf a) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (taylor inf a) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (taylor -inf a) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (taylor -inf a) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (taylor -inf a) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (taylor -inf a) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor -inf a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor -inf a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor -inf a) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor -inf a) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor -inf a) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor -inf a) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (taylor -inf a) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) (taylor 0 angle) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) (taylor 0 angle) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) (taylor 0 angle) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) (taylor 0 angle) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (taylor 0 angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle) (taylor 0 angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle) (taylor 0 angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle) (taylor 0 angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (taylor 0 angle) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (taylor 0 angle) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (taylor 0 angle) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (taylor 0 angle) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/180 (* angle (PI))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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))) (taylor inf angle) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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))) (taylor inf angle) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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))) (taylor inf angle) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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))) (taylor inf angle) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor inf angle) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor inf angle) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor inf angle) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor inf angle) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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))) (taylor -inf angle) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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))) (taylor -inf angle) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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))) (taylor -inf angle) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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))) (taylor -inf angle) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor -inf angle) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor -inf angle) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor -inf angle) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor -inf angle) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale) (taylor 0 x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor 0 x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale) (taylor 0 x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (taylor 0 x-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow x-scale 2) (- (+ (/ (* (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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (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)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (/ (* (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)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (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))) (taylor inf x-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (/ (* (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)))) (taylor inf x-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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))))) (taylor inf x-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 6) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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)))))) (taylor inf x-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale) (taylor inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale) (taylor inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (taylor inf x-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (+ (/ (* (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)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (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))) (taylor -inf x-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (/ (* (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)))) (taylor -inf x-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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))))) (taylor -inf x-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 6) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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)))))) (taylor -inf x-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)) (taylor -inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale)) (taylor -inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)) (taylor -inf x-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (taylor -inf x-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (+ (/ (* (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)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor 0 y-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))) (taylor 0 y-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))))))) (taylor 0 y-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))) (taylor 0 y-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor 0 y-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor 0 y-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor 0 y-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor 0 y-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (taylor inf y-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor inf y-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor inf y-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (taylor inf y-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf y-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor inf y-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor inf y-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor inf y-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor inf y-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (taylor inf y-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (taylor inf y-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (taylor inf y-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (taylor -inf y-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor -inf y-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor -inf y-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (taylor -inf y-scale) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf y-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor -inf y-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor -inf y-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor -inf y-scale) (#s(alt (/.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)) (patch (/.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor -inf y-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (taylor -inf y-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (taylor -inf y-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (taylor -inf y-scale) (#s(alt (-.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))))) (patch (-.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))))) #<representation binary64>) () ())) ())
Calls

15 calls:

TimeVariablePointExpression
23.0ms
angle
@-inf
((sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (pow b 2) (pow a 2) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (cos (* (/ angle 180) (PI))) (sin (* (/ angle 180) (PI))))
22.0ms
a
@-inf
((sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (pow b 2) (pow a 2) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (cos (* (/ angle 180) (PI))) (sin (* (/ angle 180) (PI))))
18.0ms
b
@0
((sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (pow b 2) (pow a 2) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (cos (* (/ angle 180) (PI))) (sin (* (/ angle 180) (PI))))
15.0ms
angle
@0
((sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (pow b 2) (pow a 2) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (cos (* (/ angle 180) (PI))) (sin (* (/ angle 180) (PI))))
15.0ms
b
@inf
((sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (pow b 2) (pow a 2) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (cos (* (/ angle 180) (PI))) (sin (* (/ angle 180) (PI))))

simplify381.0ms (0.3%)

Memory
6.8MiB live, 571.1MiB allocated
Algorithm
1×egg-herbie
Rules
8 488×lower-*.f64
8 488×lower-*.f32
5 604×lower-fma.f64
5 604×lower-fma.f32
5 254×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0120087542
1426387497
0877085328
Stop Event
1×iter limit
1×node limit
Counts
228 → 228
Calls
Call 1
Inputs
(sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(- (+ (* (pow b 2) (- (+ (* -1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(- (+ (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
(* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
(* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(- (+ (* (pow a 2) (- (+ (* -1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
(* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
(* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))
(- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))
(- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))
(- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))
1
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(* 1/180 (* angle (PI)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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)))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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)))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(* -1 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))
(/ (- (* (pow x-scale 2) (- (+ (/ (* (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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (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)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (/ (* (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)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(+ (/ (* (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)))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (/ (* (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))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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)))))
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 6) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))
(/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))
(/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (+ (/ (* (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)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))
(+ (/ (* (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)))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (/ (* (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))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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)))))
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 6) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))
(/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))
(/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (+ (/ (* (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)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (+ (/ (* (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))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (+ (/ (* (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))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
Outputs
(sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 b b))) #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))))) (*.f64 b b) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 b b)) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))))) (*.f64 b b) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 b b) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (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 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (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 a a))) (*.f64 b b) (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (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 b b) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (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 a a))) (*.f64 a a))) (*.f64 b b) (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (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 a a))))) (*.f64 b b) (*.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (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 b b) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.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))))) #s(literal -1/2 binary64)))
(- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))
(- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(fma.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 b b) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(- (+ (* (pow b 2) (- (+ (* -1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b b) (*.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 b b) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(- (+ (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 b b)) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (*.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 b b) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 b b))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 b b))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 b b))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 b b)) (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 b b))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(*.f64 (+.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 b #s(literal 6 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 b b)) (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 b b))
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64)))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 a a))) (pow.f64 b #s(literal 6 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))))
(* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 b b))
(* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (-.f64 (-.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 b y-scale) (*.f64 b y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 b b))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 b x-scale) (*.f64 b x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 b b))
(* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 b #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 b y-scale) (*.f64 b y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 b b))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 b x-scale) (*.f64 b x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 b b))
(* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(*.f64 (-.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 b #s(literal 6 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 b y-scale) (*.f64 b y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 b b)) (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 b x-scale) (*.f64 b x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 b b))
(* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 b b))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 b b))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 b b))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 b b)) (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 b b))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(*.f64 (+.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 b #s(literal 6 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 b b)) (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 b b))
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64)))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 a a))) (pow.f64 b #s(literal 6 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))))
(* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 b b))
(* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (-.f64 (-.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 b y-scale) (*.f64 b y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 b b))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 b x-scale) (*.f64 b x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 b b))
(* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 b #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 b y-scale) (*.f64 b y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 b b))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 b x-scale) (*.f64 b x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 b b))
(* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(*.f64 (-.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 b #s(literal 6 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 b y-scale) (*.f64 b y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 b b)) (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 b x-scale) (*.f64 b x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 b b))
(sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 a a))) #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))))) (*.f64 a a) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 a a)) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))))) (*.f64 a a) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 a a) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (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))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 b b))) (*.f64 a a) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 a a) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (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)))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 b b))) (*.f64 b b))) (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 b b))))) (*.f64 a a) (*.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (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 a a) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (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)))
(- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))
(- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(fma.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 a a) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(- (+ (* (pow a 2) (- (+ (* -1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(fma.f64 (fma.f64 (*.f64 (*.f64 a a) (*.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal -1/2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 a a) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 a a)) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) #s(literal -1/2 binary64))) (*.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 a a) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 a a))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 a a)) (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(*.f64 (+.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 a #s(literal 6 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 a a)) (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a))
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.f64 (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 b b))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64))))
(* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 a a))
(* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a y-scale) (*.f64 a y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 a a))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 a a))
(* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 a #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a y-scale) (*.f64 a y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 a a))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 a a))
(* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(*.f64 (-.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 a #s(literal 6 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a y-scale) (*.f64 a y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 a a)) (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a))
(* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 a a))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 a a)) (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(*.f64 (+.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 a #s(literal 6 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 a a)) (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a))
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.f64 (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 b b))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64))))
(* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 a a))
(* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a y-scale) (*.f64 a y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 a a))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 a a))
(* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 a #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a y-scale) (*.f64 a y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 a a))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 a a))
(* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(*.f64 (-.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 a #s(literal 6 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a y-scale) (*.f64 a y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (+.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) (*.f64 a a)) (*.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale)))))) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a))
(- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))
(-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))
(- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))
(fma.f64 (*.f64 (*.f64 angle angle) (/.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))
(- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 angle angle) (/.f64 (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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))) (fma.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 angle angle) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))
(- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 angle angle) (/.f64 (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.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 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/102036672000000 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/32400 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))))) #s(literal 4 binary64)))) (*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) (/.f64 (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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))) (fma.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (*.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)))))) #s(literal 1/2 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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))) (fma.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 angle angle) (*.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64))) (*.f64 angle angle) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (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 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 angle angle)) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) #s(literal 90 binary64))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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))) (fma.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))) #s(literal 32400 binary64)))) (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))))))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) #s(literal 90 binary64))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.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 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/102036672000000 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/32400 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))))) #s(literal 4 binary64)))) (*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) (/.f64 (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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))) (fma.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (*.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)))))) #s(literal 1/2 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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))) (fma.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))) #s(literal 32400 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))) #s(literal 180 binary64) (fma.f64 (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 1/1511654400000 binary64))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)) (fma.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal -1/3856986201600000000 binary64)))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))) #s(literal 32400 binary64))))) (*.f64 angle angle) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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))) (fma.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))) #s(literal 32400 binary64)))))) (*.f64 angle angle) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))))) #s(literal 1/2 binary64))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) #s(literal 90 binary64))) angle)
(- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
(- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(fma.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #s(literal 2 binary64) (fma.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64))))) (*.f64 angle angle) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))
(- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(fma.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #s(literal 2 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64) (-.f64 (fma.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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))) (fma.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 angle angle) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))
(- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(fma.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #s(literal 2 binary64) (fma.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (-.f64 (fma.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.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 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/102036672000000 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/32400 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))))) #s(literal 4 binary64)))) (*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) (/.f64 (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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))) (fma.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (*.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)))))) #s(literal 1/2 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))))) (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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))) (fma.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64)))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64))))) (*.f64 angle angle) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 angle angle) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 angle angle) (*.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 angle angle) #s(literal 1 binary64))
(* 1/180 (* angle (PI)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle)
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle)
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64))) (*.f64 angle angle) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle)
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))
(- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))
(- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 x-scale x-scale) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64))) #s(literal -1/4 binary64) (*.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (*.f64 (+.f64 b a) (-.f64 b a)))))) #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))) x-scale)
(* -1 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))
(/.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale))
(/ (- (* (pow x-scale 2) (- (+ (/ (* (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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/.f64 (fma.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale) (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))
(/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (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)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64))))) (*.f64 x-scale x-scale) (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))
(/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (/ (* (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)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64))) #s(literal 1/4 binary64) (*.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64))))) (*.f64 x-scale x-scale) (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (*.f64 x-scale x-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)))
(fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (/ (* (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))))
(fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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)))))
(fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 6) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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))))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 x-scale #s(literal 6 binary64))))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (+.f64 b a) (-.f64 b a)))))) #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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) (fma.f64 (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a))))) #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (+.f64 b a) (-.f64 b a)))))) #s(literal -1/4 binary64)))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (+.f64 b a) (-.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64))) #s(literal -1/4 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (+.f64 b a) (-.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a))))) #s(literal 1/8 binary64))))) x-scale)
(* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))
(/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (neg.f64 (*.f64 x-scale x-scale)))
(/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/.f64 (fma.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #s(literal -1/2 binary64) (neg.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))
(/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 x-scale #s(literal 4 binary64))))) #s(literal 1/4 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))
(/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (+ (/ (* (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)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))
(/.f64 (fma.f64 (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64))) #s(literal -1/4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 x-scale #s(literal 4 binary64))))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))))) (*.f64 x-scale x-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)))
(fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (/ (* (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))))
(fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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)))))
(fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 6) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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))))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 x-scale #s(literal 6 binary64))))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (+.f64 b a) (-.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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 x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (+.f64 b a) (-.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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 x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64))) #s(literal -1/4 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (+.f64 b a) (-.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a))))) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (+.f64 b a) (-.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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 x-scale))
(* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))
(/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (neg.f64 (*.f64 x-scale x-scale)))
(/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/.f64 (fma.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #s(literal -1/2 binary64) (neg.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))
(/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 x-scale #s(literal 4 binary64))))) #s(literal 1/4 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (fma.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (*.f64 x-scale x-scale))
(/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (+ (/ (* (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)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))
(/.f64 (fma.f64 (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64))) #s(literal -1/4 binary64))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 x-scale #s(literal 4 binary64))))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))))) (*.f64 x-scale x-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 y-scale y-scale) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64))) #s(literal -1/4 binary64) (*.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (*.f64 (+.f64 b a) (-.f64 b a)))))) #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 4 binary64)))) #s(literal -1/4 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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal 1/8 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))) y-scale)
(* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(neg.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))
(- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(fma.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) #s(literal -1/2 binary64) (neg.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64))) #s(literal 1/4 binary64) (*.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 4 binary64)))) #s(literal -1/4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) #s(literal 1/2 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64)))) #s(literal 1/4 binary64))) (*.f64 y-scale y-scale) (*.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64)) (pow.f64 y-scale #s(literal 6 binary64))))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (+.f64 b a) (-.f64 b a)))))) #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal 1/2 binary64)))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (+.f64 b a) (-.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal 1/2 binary64))))) y-scale)
(* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-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))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(fma.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) #s(literal -1/2 binary64) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))
(- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(-.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64)) (pow.f64 y-scale #s(literal 6 binary64))))) #s(literal 1/4 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64)) (pow.f64 y-scale #s(literal 6 binary64))))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (+.f64 b a) (-.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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)))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/8 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (+.f64 b a) (-.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))))))
(* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-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))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(fma.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) #s(literal -1/2 binary64) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))
(- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(-.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64)) (pow.f64 y-scale #s(literal 6 binary64))))) #s(literal 1/4 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))

rewrite237.0ms (0.2%)

Memory
11.9MiB live, 286.6MiB allocated
Rules
3 892×lower-*.f32
3 876×lower-*.f64
3 258×lower-pow.f32
3 242×lower-pow.f64
3 004×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
042402
077402
1329402
22995374
08139357
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
7 → 124
Calls
Call 1
Inputs
(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))))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #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))
(-.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)))))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
Outputs
(*.f64 (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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/2 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 4 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 y-scale x-scale)) #s(literal 4 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 y-scale x-scale)) #s(literal 2 binary64)))) #s(literal 1/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 y-scale x-scale)) #s(literal 6 binary64)) (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 6 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 4 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 y-scale x-scale)) #s(literal 4 binary64))) (pow.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 y-scale x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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/2 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) #s(literal 4 binary64)) #s(literal 1/4 binary64))
(pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 (sqrt.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 4 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 y-scale x-scale)) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 y-scale x-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 y-scale x-scale)) #s(literal 6 binary64)) (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 6 binary64)))) (sqrt.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))) #s(literal 4 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 y-scale x-scale)) #s(literal 4 binary64))) (pow.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 y-scale x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))
(hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))
(hypot.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 y-scale x-scale)))
(exp.f64 (log.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))))
(*.f64 b b)
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 b))
(pow.f64 (*.f64 b b) #s(literal 1 binary64))
(pow.f64 b #s(literal 2 binary64))
(exp.f64 (*.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
(*.f64 a a)
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 a))
(pow.f64 (*.f64 a a) #s(literal 1 binary64))
(pow.f64 a #s(literal 2 binary64))
(exp.f64 (*.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))
(*.f64 (pow.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 y-scale x-scale)) (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 #s(literal 1 binary64) (+.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 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 x-scale)) (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (+.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)))))
(*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 x-scale))) (neg.f64 y-scale))
(*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 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)))))) x-scale))
(*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))
(*.f64 (*.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))) y-scale)
(*.f64 (*.f64 (/.f64 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)))))) x-scale) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 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)))))) x-scale) (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (neg.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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) (/.f64 (*.f64 (*.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 x-scale)))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 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)))))) x-scale) (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))))))
(*.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (*.f64 (*.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 (*.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.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)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))) (*.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 y-scale x-scale))) #s(literal 1 binary64)) #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 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 y-scale x-scale))) #s(literal -1 binary64))
(/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 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 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 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 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)))))) x-scale)) (+.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (/.f64 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)))))) x-scale)) (fma.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (+.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 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 x-scale)))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (*.f64 (/.f64 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)))))) x-scale)) #s(literal 2 binary64)) (pow.f64 (*.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (*.f64 (*.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))) (fma.f64 (/.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale 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 x-scale) (*.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (*.f64 (*.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 (pow.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (*.f64 (/.f64 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)))))) x-scale)) #s(literal 3 binary64)) (pow.f64 (*.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (*.f64 (*.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 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (*.f64 (/.f64 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)))))) x-scale)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (*.f64 (*.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 (*.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (*.f64 (/.f64 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)))))) x-scale)) (*.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (*.f64 (*.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 (neg.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 y-scale x-scale)))
(/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 y-scale x-scale))))
(/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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))) #s(literal 1 binary64)) (*.f64 (fma.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (+.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-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 y-scale x-scale))))
(/.f64 (-.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 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 y-scale 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 y-scale x-scale)) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.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))))) (*.f64 y-scale x-scale)) #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 y-scale x-scale)))))
(/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 (*.f64 (*.f64 (+.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))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 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 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 x-scale)) (+.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (fma.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (+.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 y-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 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 y-scale x-scale))) #s(literal 1 binary64)))
(/.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 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 y-scale x-scale))))
(/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 y-scale x-scale)))
(neg.f64 (/.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 y-scale x-scale))))
(neg.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 y-scale x-scale)))))
(fma.f64 (/.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 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 x-scale))) (neg.f64 y-scale) (neg.f64 (*.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (*.f64 (*.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))))
(fma.f64 (/.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 1 binary64)) (*.f64 (/.f64 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)))))) x-scale) (neg.f64 (*.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (*.f64 (*.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))))
(fma.f64 (/.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale 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 x-scale) (neg.f64 (*.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (*.f64 (*.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))))
(fma.f64 (/.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 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)) y-scale (neg.f64 (*.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (*.f64 (*.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))))
(fma.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (*.f64 (/.f64 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)))))) x-scale) (neg.f64 (*.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (*.f64 (*.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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 y-scale x-scale))) (/.f64 (+.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 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 y-scale x-scale))))
(-.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (*.f64 (/.f64 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)))))) x-scale)) (*.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (*.f64 (*.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)))
(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 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (*.f64 y-scale x-scale)))) #s(literal -1 binary64)))
(+.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (*.f64 (/.f64 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)))))) x-scale)) (neg.f64 (*.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (*.f64 (*.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 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 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 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 #s(literal 1 binary64) (fma.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (+.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (+.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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))
(pow.f64 (/.f64 (fma.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (+.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64))) (+.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (+.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (neg.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (neg.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 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 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (+.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)) (-.f64 (pow.f64 (neg.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (neg.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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)))) (neg.f64 (fma.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (+.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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))) (fma.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (+.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 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 (fma.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (+.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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)))))
(fma.f64 (pow.f64 (/.f64 y-scale (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 #s(literal 1 binary64) (neg.f64 y-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))))
(fma.f64 (pow.f64 (/.f64 y-scale (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 #s(literal 1 binary64) (neg.f64 y-scale)) (+.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 x-scale x-scale))) (neg.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))))))
(fma.f64 (pow.f64 (/.f64 y-scale (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 #s(literal 1 binary64) (neg.f64 y-scale)) (neg.f64 (+.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)))))
(fma.f64 #s(literal -1 binary64) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))))
(fma.f64 (-.f64 (pow.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)))) (neg.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 x-scale x-scale))) (neg.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))))))
(fma.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)))))
(fma.f64 (-.f64 (pow.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (pow.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 x-scale x-scale))) (neg.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))))))
(fma.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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)) (neg.f64 (+.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)))))
(fma.f64 (-.f64 (*.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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) (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 #s(literal 1 binary64) (*.f64 y-scale x-scale)) (neg.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 x-scale x-scale))) (neg.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)))))
(fma.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 x-scale x-scale))) (neg.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))))))
(fma.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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) (neg.f64 (+.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)))))
(fma.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))))
(fma.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 x-scale x-scale))) (neg.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))))))
(fma.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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) (neg.f64 (+.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)))))
(fma.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))))
(fma.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 x-scale x-scale))) (neg.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))))))
(fma.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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)) (neg.f64 (+.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)))))
(-.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 3 binary64)) (fma.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (+.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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)) (fma.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (+.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) #s(literal 2 binary64)))))
(-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))))
(-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (neg.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))))))
(-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (+.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))))
(+.f64 (neg.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))))
(+.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (neg.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))))
(+.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))))
(+.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 x-scale x-scale))) (neg.f64 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))))))
(+.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)))))
(pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64))
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 1 binary64)))
(pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #s(literal 1 binary64))
(sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #s(literal 1 binary64)))

eval154.0ms (0.1%)

Memory
39.5MiB live, 311.6MiB allocated
Compiler

Compiled 167 174 to 3 246 computations (98.1% saved)

prune367.0ms (0.2%)

Memory
-29.7MiB live, 738.2MiB allocated
Pruning

24 alts after pruning (24 fresh and 0 done)

PrunedKeptTotal
New51424538
Fresh000
Picked101
Done000
Total51524539
Accuracy
56.7%
Counts
539 → 24
Alt Table
Click to see full alt table
StatusAccuracyProgram
14.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (fma.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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)))
16.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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 #s(approx (sin (* (/ angle 180) (PI))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
17.5%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a #s(approx (cos (* (/ angle 180) (PI))) (fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)) #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)))) (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)))
16.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)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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)))
▶16.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)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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)))
15.3%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-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))) (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 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 b b)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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)))
15.0%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b #s(approx (sin (* (/ angle 180) (PI))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.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)))
14.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a #s(approx (cos (* (/ angle 180) (PI))) (fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)) #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 (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)))
14.6%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 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)))
22.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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.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 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
14.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 b b))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 a a))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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.2%
(*.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 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale 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))) (PI.f64)))
▶14.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64)))
14.2%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (*.f64 (/.f64 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)))))) x-scale) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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)))) (PI.f64)))
2.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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 angle angle)) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) #s(literal 90 binary64))) angle))) (PI.f64)))
26.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 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64)))) (PI.f64)))
16.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 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))) (PI.f64)))
23.3%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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)))
▶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 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
▶30.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 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)))
▶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 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)))
Compiler

Compiled 6 854 to 2 298 computations (66.5% saved)

simplify204.0ms (0.1%)

Memory
11.5MiB live, 204.7MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))
cost-diff0
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))))
cost-diff0
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))
cost-diff0
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)))
cost-diff384
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
cost-diff384
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
cost-diff6144
(pow.f64 a #s(literal 2 binary64))
cost-diff6144
(pow.f64 b #s(literal 2 binary64))
cost-diff0
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64)))
cost-diff128
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))
cost-diff128
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))))
cost-diff320
(*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))
cost-diff0
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))
cost-diff0
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))))
cost-diff0
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))
cost-diff0
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
cost-diff0
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))
cost-diff0
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))))
cost-diff0
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))
cost-diff0
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)))
Rules
6 396×lower-*.f32
6 296×lower-*.f64
6 072×lower-/.f32
6 018×lower-/.f64
3 382×lower-fma.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01708164
03048164
15997984
220637984
378187984
088747822
Stop Event
1×iter limit
1×node limit
1×iter limit
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)) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale)
(*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))
#s(literal 2 binary64)
(fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))
(*.f64 b b)
b
(pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 (PI.f64) angle)
(PI.f64)
angle
#s(literal 1/180 binary64)
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))
(*.f64 a a)
a
(pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))))
x-scale
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
(-.f64 b a)
#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 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))
(/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))
(*.f64 x-scale y-scale)
x-scale
y-scale
(*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
#s(literal 2 binary64)
(-.f64 (/.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 a a)
a
(*.f64 y-scale y-scale)
(/.f64 (*.f64 b b) (*.f64 x-scale x-scale))
(*.f64 b b)
b
(*.f64 x-scale x-scale)
(*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (PI.f64) angle)
(PI.f64)
angle
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
(-.f64 b a)
#s(literal 90 binary64)
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))
(atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale)))
(*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))
(/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))))
(-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)))
(/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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))))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))
#s(literal 2 binary64)
(*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))
(PI.f64)
(*.f64 #s(literal 1/180 binary64) angle)
#s(literal 1/180 binary64)
angle
(*.f64 b b)
b
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 a a)
a
(*.f64 y-scale y-scale)
y-scale
(/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)
x-scale
(hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 y-scale 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 b a) (-.f64 b a))
(+.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 x-scale)
(-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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)))
#s(literal 180 binary64)
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-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 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.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))
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
a
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 angle #s(literal 180 binary64))
angle
(PI.f64)
#s(literal 2 binary64)
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
b
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(*.f64 a (sin.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 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
x-scale
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))
(/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))
(*.f64 b b)
(pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 (PI.f64) angle)
#s(literal 1/180 binary64)
(*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))
(*.f64 a a)
(pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 y-scale y-scale)
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 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 #s(literal 2 binary64) (-.f64 (pow.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 #s(literal 2 binary64) (-.f64 (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)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #s(literal 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 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
y-scale
(/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64)))
(*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))
#s(literal -2 binary64)
(fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))
(*.f64 b b)
b
(pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 (PI.f64) angle)
(PI.f64)
angle
#s(literal 1/180 binary64)
#s(literal 2 binary64)
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))
(*.f64 a a)
a
(pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))
(/.f64 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
(-.f64 b a)
#s(literal 4 binary64)
#s(literal 1/2 binary64)
(*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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))))
x-scale
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
#s(literal -1/2 binary64)
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 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 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 y-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) x-scale)))))) (/.f64 #s(literal 180 binary64) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 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 y-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) 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)) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) x-scale)))))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) x-scale))))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) x-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale)
(*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a))))
(*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))
(*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))
#s(literal 2 binary64)
(fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))
(*.f64 b b)
b
(pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))
(*.f64 (PI.f64) angle)
(PI.f64)
angle
#s(literal 1/180 binary64)
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a))
(*.f64 a a)
a
(pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))
y-scale
(*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) x-scale))
(*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) x-scale)
x-scale
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))))
(*.f64 (+.f64 b a) (-.f64 b a))
(*.f64 (-.f64 b a) (+.f64 b a))
(+.f64 b a)
(-.f64 b a)
#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 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (fma.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 90 binary64)) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))))) (/.f64 #s(literal 180 binary64) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (fma.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 90 binary64)) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (fma.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 90 binary64)) (*.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)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (fma.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 90 binary64)) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))
(*.f64 (*.f64 (fma.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 90 binary64)) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))))
(/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (*.f64 (fma.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))))
(*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.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) #s(literal 2 binary64)) (fma.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a)))
(*.f64 x-scale y-scale)
x-scale
y-scale
(*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
(*.f64 (fma.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a)) #s(literal 2 binary64))
#s(literal 2 binary64)
(-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))
(fma.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(*.f64 (/.f64 a (*.f64 y-scale y-scale)) a)
(*.f64 a a)
a
(*.f64 y-scale y-scale)
(/.f64 (*.f64 b b) (*.f64 x-scale x-scale))
(*.f64 (/.f64 b (*.f64 x-scale x-scale)) b)
(*.f64 b b)
b
(*.f64 x-scale x-scale)
(*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))
(*.f64 (PI.f64) angle)
(PI.f64)
angle
(*.f64 (+.f64 b a) (-.f64 b a))
(*.f64 (-.f64 b a) (+.f64 b a))
(+.f64 b a)
(-.f64 b a)
#s(literal 90 binary64)
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64)))
(*.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 (-.f64 b a) (+.f64 b a)))))) (/.f64 #s(literal 180 binary64) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))
(/.f64 (atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 (-.f64 b a) (+.f64 b a)))))) (PI.f64))
(atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale)))
(atan.f64 (*.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 (-.f64 b a) (+.f64 b a))))))
(*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))
(*.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 (-.f64 b a) (+.f64 b a)))))
(/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 x-scale y-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 (-.f64 b a) (+.f64 b a))))
(-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))))
(-.f64 (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 x-scale y-scale))))
(-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)))
(-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 x-scale x-scale)))
(/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))
(/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a)))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.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))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))
(*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))
(*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))
#s(literal 2 binary64)
(*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))
(*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))
(PI.f64)
(*.f64 #s(literal 1/180 binary64) angle)
#s(literal 1/180 binary64)
angle
(*.f64 b b)
b
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.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))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(*.f64 a a)
a
(*.f64 y-scale y-scale)
y-scale
(/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))
(/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 x-scale x-scale))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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)))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))
(*.f64 x-scale x-scale)
x-scale
(hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))
(hypot.f64 (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.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 y-scale x-scale))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.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 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 (-.f64 b a) (+.f64 b a)))
(*.f64 (+.f64 b a) (-.f64 b a))
(*.f64 (-.f64 b a) (+.f64 b a))
(+.f64 b a)
(-.f64 b a)
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))
(*.f64 y-scale x-scale)
(*.f64 x-scale y-scale)
(-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))
(-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale y-scale)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) #s(literal 2 binary64))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (/.f64 #s(literal 180 binary64) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) #s(literal 2 binary64))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (PI.f64))
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) #s(literal 2 binary64))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
(*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) #s(literal 2 binary64))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))
(-.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))) (*.f64 y-scale y-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 (pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64))) (*.f64 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)
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64))) (*.f64 y-scale 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 (pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64))) y-scale)
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64))
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a)
a
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 angle #s(literal 180 binary64))
angle
(PI.f64)
#s(literal 2 binary64)
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64))
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b)
b
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
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 (pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64))) (*.f64 x-scale 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 (pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64))) x-scale)
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64)))
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a) #s(literal 2 binary64))
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) a)
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b) #s(literal 2 binary64))
(*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) b)
x-scale
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))
(/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64))))
(*.f64 b b)
(pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))
(*.f64 (PI.f64) angle)
#s(literal 1/180 binary64)
(*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))
(*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))
(*.f64 a a)
(pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))
(*.f64 y-scale y-scale)
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
(*.f64 (*.f64 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) #s(literal 2 binary64))) (/.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (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 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (*.f64 (*.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (*.f64 (-.f64 b a) (+.f64 b a))) (/.f64 #s(literal 2 binary64) x-scale)))
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 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 (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) #s(literal 2 binary64))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.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 (-.f64 b a) (+.f64 b a)) #s(literal 2 binary64)) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
(*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) #s(literal 2 binary64))
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
(*.f64 (-.f64 b a) (+.f64 b a))
(pow.f64 b #s(literal 2 binary64))
(*.f64 b b)
(pow.f64 a #s(literal 2 binary64))
(*.f64 a a)
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a))) (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))))) (/.f64 #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) x-scale)))) y-scale))) (/.f64 #s(literal 180 binary64) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a))) (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))))) (/.f64 #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) 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 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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 (fma.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a))) (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))))) (/.f64 #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) 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)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a))) (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))))) (/.f64 #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) x-scale)))) y-scale))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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 (fma.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a))) (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))))) (/.f64 #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) x-scale)))) y-scale)
(*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a))) (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))))) (/.f64 #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) x-scale))))
y-scale
(/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a))) (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))))) (/.f64 #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) x-scale)))
(fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))
(fma.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a))) (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))))) (/.f64 #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a)))) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a))))
(/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a))) (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a))))
(fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64)))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a))) (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a))))))
(*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))
(*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a))))
#s(literal -2 binary64)
(fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a)))
(*.f64 b b)
b
(pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))
(*.f64 (PI.f64) angle)
(PI.f64)
angle
#s(literal 1/180 binary64)
#s(literal 2 binary64)
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 a a))
(*.f64 a a)
a
(pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))
(fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 b (/.f64 b (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a)))
(/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
(*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (/.f64 a (*.f64 y-scale y-scale)) a))
(/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))
(/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (-.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) #s(literal 2 binary64)))
(*.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 b a) (-.f64 b a))
(*.f64 (-.f64 b a) (+.f64 b a))
(+.f64 b a)
(-.f64 b a)
#s(literal 4 binary64)
#s(literal 1/2 binary64)
(*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) x-scale))
(*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))) x-scale)
x-scale
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 (PI.f64) angle))))
#s(literal -1/2 binary64)

localize1.9s (1.3%)

Memory
-95.3MiB live, 2 191.7MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy19.503406488205876
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
accuracy26.069992939865525
(fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64)))
accuracy31.009362984486163
(/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
accuracy35.8368214521961
(/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))
accuracy19.503406488205904
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy21.382600419521737
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))
accuracy23.06581665640151
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))
accuracy26.09567931193721
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
accuracy18.74361136081105
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))
accuracy19.07839634987024
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))))
accuracy21.382600419521737
(-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))))
accuracy22.42011615810066
(/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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))))))
accuracy14.669988951365976
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
accuracy15.927090196194715
(*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))
accuracy26.891540236320296
(/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))
accuracy44.656231019891365
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))
accuracy10.820759720751798
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))
accuracy19.233132198223526
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
accuracy19.503406488205876
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
accuracy29.136449575227886
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
Samples
889.0ms172×1valid
317.0ms68×2valid
40.0ms6×3valid
13.0ms9×0valid
1.0ms1×1exit
Compiler

Compiled 7 645 to 136 computations (98.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 1.1s
ival-sin: 326.0ms (30.5% of total)
ival-mult: 245.0ms (22.9% of total)
ival-cos: 122.0ms (11.4% of total)
ival-div: 119.0ms (11.1% of total)
ival-pow2: 59.0ms (5.5% of total)
adjust: 56.0ms (5.2% of total)
ival-sub: 41.0ms (3.8% of total)
ival-add: 38.0ms (3.6% of total)
ival-hypot: 25.0ms (2.3% of total)
const: 19.0ms (1.8% of total)
ival-sqrt: 10.0ms (0.9% of total)
ival-atan: 7.0ms (0.7% of total)
ival-pi: 2.0ms (0.2% of total)
exact: 1.0ms (0.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series1.4s (1%)

Memory
15.8MiB live, 2 422.0MiB allocated
Counts
37 → 1 620
Calls
Call 1
Inputs
#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())
#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())
#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())
#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())
#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())
#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())
#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())
#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())
#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())
#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())
#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())
#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())
#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())
#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())
#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())
Outputs
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (taylor 0 b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (taylor 0 b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))))))) (taylor 0 b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (taylor 0 b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (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))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (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))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (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))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* b (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (* b (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* 2 (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI))))))))))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ x-scale (* angle (* y-scale (PI))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* b (* x-scale (+ a (* -1 a)))) (* (pow a 2) (* angle (* y-scale (PI))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))) (pow a 2))) (/ (* x-scale (+ a (* -1 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))) (* 2 (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI))))))))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) y-scale)) (taylor 0 b) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale))) (taylor 0 b) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale))) (taylor 0 b) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale))) (taylor 0 b) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (taylor 0 b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (* b (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI))))))))) (taylor 0 b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (* b (- (+ (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* b (- (+ (* -1 (/ (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ 1 (* (pow a 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* (/ 1 (* (pow a 4) (sin (* 1/90 (* angle (PI)))))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI)))))))) (pow a 2))) (+ (* 1/2 (/ 1 (* (pow a 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow a 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))))))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI))))))))) (taylor 0 b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (* b (- (+ (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* b (- (+ (* -1 (/ (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ 1 (* (pow a 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* b (- (* 1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (+ (* -1 (/ (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ 1 (* (pow a 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* (/ 1 (* (pow a 4) (sin (* 1/90 (* angle (PI)))))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI)))))))) (pow a 2))) (+ (* 1/2 (/ 1 (* (pow a 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow a 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))))))))) (pow a 2))) (* -1 (/ (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI))))))) (pow a 2)))))) (* (/ 1 (* (pow a 4) (sin (* 1/90 (* angle (PI)))))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI)))))))) (pow a 2))) (+ (* 1/2 (/ 1 (* (pow a 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow a 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))))))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI))))))))) (taylor 0 b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (* (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* b (- (* b (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* b (- (* b (- (+ (* -1/2 (* (* b (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ 1 (pow y-scale 2)))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (taylor 0 b) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (taylor 0 b) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (taylor 0 b) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))) (taylor 0 b) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow b 2) (- (+ (* -1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (taylor 0 b) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* b (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow a 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (taylor 0 b) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* b (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow a 2))) (* b (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (taylor 0 b) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* b (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow a 2))) (* b (- (+ (* b (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (taylor 0 b) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor 0 b) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* b (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (taylor 0 b) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* b (- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))))) (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (taylor 0 b) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* b (- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (- (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* b (- (* -1/2 (/ (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))))) (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))))) (pow a 2))) (* -1 (/ (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))))) (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (taylor 0 b) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (taylor 0 b) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (taylor 0 b) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))) (* b (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))))))) (taylor 0 b) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))) (* b (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (+ (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)))))))))) (taylor 0 b) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor inf b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor inf b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor inf b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (taylor inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ y-scale (* angle (* x-scale (PI))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI))))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* -2 (/ (+ (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI))))) (* (+ a (* -1 a)) (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) x-scale)) (taylor inf b) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale))))) (taylor inf b) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale))))) (taylor inf b) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale))))) (taylor inf b) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sin (* 1/90 (* angle (PI))))) (taylor inf b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ 1/2 (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (sin (* 1/90 (* angle (PI))))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (+ (/ 1/2 (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* b (sin (* 1/90 (* angle (PI))))))))))) (taylor inf b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (/ 1/2 (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (sin (* 1/90 (* angle (PI))))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (+ (/ 1/2 (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))) (+ (/ (* (+ a (* -1 a)) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) (pow b 2)) (+ (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* b (sin (* 1/90 (* angle (PI)))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))))))))))) (taylor inf b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* -1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* (pow b 3) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (/ 1/2 (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))))) (+ (* -1 (/ (* (pow a 2) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) (pow b 3))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (sin (* 1/90 (* angle (PI))))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (+ (/ 1/2 (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))) (+ (/ (* (+ a (* -1 a)) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) (pow b 2)) (+ (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* b (sin (* 1/90 (* angle (PI)))))) (+ (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI)))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (sin (* 1/90 (* angle (PI))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* (+ a (* -1 a)) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))))))) (pow b 3)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))))))))))))) (taylor inf b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (taylor inf b) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (* -1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* 1/2 (/ 1 (pow y-scale 2)))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (taylor inf b) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2)))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow b 2)) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2))))))))))) (taylor inf b) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (* -1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow b 3)) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow b 2)) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2))))))))))) (taylor inf b) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (taylor inf b) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (taylor inf b) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (taylor inf b) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (taylor inf b) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor inf b) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor inf b) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor inf b) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (taylor inf b) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor inf b) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor inf b) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (taylor inf b) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow b 3))) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (* (pow b 3) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (taylor inf b) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf b) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor inf b) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))))) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))) (taylor inf b) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 1/2 (/ (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 3) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 3))) (+ (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* (+ a (* -1 a)) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)) (/ (* (+ a (* -1 a)) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (+ a (* -1 a)) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 3))))))) (taylor inf b) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (taylor inf b) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (taylor inf b) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow b 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (taylor inf b) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow b 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 3) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (taylor inf b) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* -1 (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a (* -1 b)) 2) (pow (- a (* -1 b)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a (* -1 b)) (- a (* -1 b))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* -1 (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a (* -1 b)) 2) (pow (- a (* -1 b)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a (* -1 b)) (- a (* -1 b))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* -1 (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a (* -1 b)) 2) (pow (- a (* -1 b)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a (* -1 b)) (- a (* -1 b))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* -1 (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a (* -1 b)) 2) (pow (- a (* -1 b)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a (* -1 b)) (- a (* -1 b))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (pow.f64 b #s(literal 2 binary64)) (patch (pow.f64 b #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor -inf b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor -inf b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor -inf b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (taylor -inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) b))) b)) (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ y-scale (* angle (* x-scale (PI))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI))))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) b))) b))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI)))))) b))) b))) b))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) x-scale)) (taylor -inf b) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sin (* 1/90 (* angle (PI))))) (taylor -inf b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ 1/2 (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (sin (* 1/90 (* angle (PI))))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (+ (/ 1/2 (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* b (sin (* 1/90 (* angle (PI))))))))))) (taylor -inf b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (/ (- (+ (* -1 (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* b (sin (* 1/90 (* angle (PI)))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) b)) (/ (* (pow a 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* b (sin (* 1/90 (* angle (PI)))))))) b)) (/ 1/2 (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (sin (* 1/90 (* angle (PI))))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (/ 1/2 (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))))) (taylor -inf b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (/ (+ (* -1 (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) (* -1 (/ (- (+ (* -1 (- (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (* (+ a (* -1 a)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI)))))))) (/ (* (pow a 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI)))))))) (* 1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* b (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (* (+ a (* -1 a)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI)))))))) (/ (* (pow a 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI)))))))) b)) (* -1 (/ (* (pow a 2) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) b)))) b))) b)) (/ 1/2 (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (sin (* 1/90 (* angle (PI))))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (/ 1/2 (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))))) (taylor -inf b) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (taylor -inf b) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* 1/2 (/ 1 (pow y-scale 2)))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (taylor -inf b) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (* -1 (/ (- (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) b)) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) b)) (* 1/2 (/ 1 (pow y-scale 2)))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (taylor -inf b) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (* -1 (/ (- (* -1 (/ (- (+ (* 1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) b) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) b)) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) b)) (* 1/2 (/ 1 (pow y-scale 2)))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (taylor -inf b) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (taylor -inf b) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (taylor -inf b) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (taylor -inf b) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (taylor -inf b) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor -inf b) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (taylor -inf b) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor -inf b) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor -inf b) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) b)) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor -inf b) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) b)) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) b)) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor -inf b) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf b) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor -inf b) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (+ (* -1 (- (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) b)) (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor -inf b) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* -1 (- (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (- (+ (* -1 (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (* (+ a (* -1 a)) (- (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* -1/2 (/ (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (* (+ a (* -1 a)) (- (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) b)) (* -1 (/ (* (pow a 2) (- (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) b)))) b))) b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor -inf b) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (taylor -inf b) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (pow y-scale 2)))) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor 0 a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor 0 a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (taylor 0 a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))))))) (taylor 0 a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (taylor 0 a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (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))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (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))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (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))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* a (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (* a (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -2 (* a (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (pow b 2))))) (* 2 (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor 0 a) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor 0 a) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor 0 a) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor 0 a) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ y-scale (* angle (* x-scale (PI))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* a (* y-scale (+ b (* -1 b)))) (* angle (* (pow b 2) (* x-scale (PI))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (* a (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))) (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI))))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))) (* a (+ (* -2 (* a (+ (* -1 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 4) (* x-scale (PI)))))) (/ (* (+ b (* -1 b)) (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))) (pow b 2))))) (* 2 (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) x-scale)) (taylor 0 a) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale))) (taylor 0 a) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale))) (taylor 0 a) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale))) (taylor 0 a) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (taylor 0 a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* a (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI)))))))) (/ (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (taylor 0 a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* a (- (+ (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* a (- (+ (* 1/2 (/ 1 (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))))) (+ (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow b 4) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ 1 (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI)))))))) (pow b 2)))))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI)))))))) (/ (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (taylor 0 a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* a (- (+ (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* a (- (+ (* 1/2 (/ 1 (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* a (- (* -1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* -1 (/ (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI))))))) (pow b 2))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))))) (+ (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow b 4) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ 1 (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI)))))))) (pow b 2))))))) (pow b 2)))))))) (+ (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow b 4) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ 1 (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI)))))))) (pow b 2)))))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI)))))))) (/ (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (taylor 0 a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (* (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* a (- (* a (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* a (- (* a (- (+ (* -1/2 (* (* a (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (taylor 0 a) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (taylor 0 a) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (taylor 0 a) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))) (taylor 0 a) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow a 2) (- (+ (* -1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (taylor 0 a) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow b 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor 0 a) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow b 2))) (* a (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor 0 a) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow b 2))) (* a (- (+ (* a (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor 0 a) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) (+ (* a (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) (+ (* a (- (+ (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* (+ b (* -1 b)) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) (+ (* a (- (+ (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* a (- (* 1/2 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* (+ b (* -1 b)) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))) (pow b 2))))) (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* (+ b (* -1 b)) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (taylor 0 a) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (taylor 0 a) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))) (* a (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))))))) (taylor 0 a) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))) (* a (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)))))))))) (taylor 0 a) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor inf a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor inf a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor inf a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (taylor inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (pow a 3))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor inf a) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor inf a) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor inf a) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor inf a) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ x-scale (* angle (* y-scale (PI))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI))))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) (pow a 3))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) y-scale)) (taylor inf a) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale)))) (taylor inf a) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale)))) (taylor inf a) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale)))) (taylor inf a) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI)))))) (taylor inf a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI)))))) (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* a (sin (* 1/90 (* angle (PI))))))) (taylor inf a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (+ (* -1 (/ (* (+ b (* -1 b)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI))))))) (pow a 2))) (+ (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* a (sin (* 1/90 (* angle (PI)))))) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))))) (taylor inf a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (* 1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* (pow a 3) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (* -1 (/ (* (+ b (* -1 b)) (- (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (* (+ b (* -1 b)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))))) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))))) (pow a 3))) (+ (* -1 (/ (* (+ b (* -1 b)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI))))))) (pow a 2))) (+ (* -1 (/ (* (pow b 2) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI))))))) (pow a 3))) (+ (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* a (sin (* 1/90 (* angle (PI)))))) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))))))) (taylor inf a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (taylor inf a) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (* -1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (taylor inf a) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2)))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (pow a 2)) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2))))))))) (taylor inf a) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (* -1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (pow a 3)) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2))))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (pow a 2)) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2))))))))) (taylor inf a) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (taylor inf a) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (taylor inf a) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (taylor inf a) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (taylor inf a) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor inf a) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor inf a) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor inf a) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (taylor inf a) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (taylor inf a) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (taylor inf a) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (taylor inf a) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow a 3))) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (* (pow a 3) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (taylor inf a) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor inf a) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor inf a) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (+ (* -1 (/ (* (+ b (* -1 b)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))) (+ (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (taylor inf a) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1/2 (/ (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 3) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (+ (* -1 (/ (* (+ b (* -1 b)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))) (+ (* -1 (/ (* (+ b (* -1 b)) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (* (+ b (* -1 b)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 3))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 3))) (+ (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (taylor inf a) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (taylor inf a) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (taylor inf a) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow a 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (taylor inf a) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow a 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 3) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))) (taylor inf a) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ b (* -1 a)) 2) (pow (- b (* -1 a)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ b (* -1 a)) (- b (* -1 a)))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ b (* -1 a)) 2) (pow (- b (* -1 a)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ b (* -1 a)) (- b (* -1 a)))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ b (* -1 a)) 2) (pow (- b (* -1 a)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ b (* -1 a)) (- b (* -1 a)))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ b (* -1 a)) 2) (pow (- b (* -1 a)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ b (* -1 a)) (- b (* -1 a)))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow a 2) (taylor -inf a) (#s(alt (pow.f64 a #s(literal 2 binary64)) (patch (pow.f64 a #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor -inf a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor -inf a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor -inf a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (taylor -inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* 2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a))) a))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* 2 (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) a))) a))) a))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor -inf a) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor -inf a) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor -inf a) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor -inf a) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ x-scale (* angle (* y-scale (PI))))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI))))))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) a))) a))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -1 (/ (+ (* 2 (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) a))) a))) a))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) y-scale)) (taylor -inf a) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI)))))) (taylor -inf a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))) a)) (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI))))))) (taylor -inf a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (+ (* -1 (/ (- (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (* (+ b (* -1 b)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))))) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI))))))) a)) (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))) a)) (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI))))))) (taylor -inf a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* 1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (sin (* 1/90 (* angle (PI))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (* (+ b (* -1 b)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))))) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI))))))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))))))) a)) (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (sin (* 1/90 (* angle (PI))))))) (+ (* -1 (* (+ b (* -1 b)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))))) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI))))))) a)) (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))) a)) (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI))))))) (taylor -inf a) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (taylor -inf a) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (taylor -inf a) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (* -1 (/ (- (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) a)) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) a)) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (taylor -inf a) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (* -1 (/ (- (* -1 (/ (- (+ (* 1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) a) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) a)) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) a)) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (taylor -inf a) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (taylor -inf a) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (taylor -inf a) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (taylor -inf a) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (taylor -inf a) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor -inf a) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (taylor -inf a) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (taylor -inf a) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (taylor -inf a) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4))) a)) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (taylor -inf a) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) a)) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4))) a)) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (taylor -inf a) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor -inf a) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) a))) (taylor -inf a) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (* (+ b (* -1 b)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) a))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) a))) (taylor -inf a) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (- (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (- (* -1/2 (/ (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (* (+ b (* -1 b)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* -1 (* (pow b 2) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) a))) (+ (* -1 (* (+ b (* -1 b)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) a))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) a))) (taylor -inf a) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (taylor -inf a) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (pow y-scale 2)))) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (taylor 0 angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (- (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* -1/32400 (pow (PI) 2)))) (taylor 0 angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (- (* (pow angle 2) (- (* 1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4)))) (* -1/32400 (pow (PI) 2)))) (taylor 0 angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (- (* (pow angle 2) (- (* (pow angle 2) (- (* -1/347128758144000000000 (* (pow angle 2) (pow (PI) 8))) (* -1/765275040000000 (pow (PI) 6)))) (* 1/3149280000 (pow (PI) 4)))) (* -1/32400 (pow (PI) 2)))) (taylor 0 angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/3149280000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (taylor 0 angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle) (taylor 0 angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle) (taylor 0 angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle) (taylor 0 angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow a 2) (pow y-scale 2))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (/ (pow a 2) (pow y-scale 2))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))))) (/ (pow a 2) (pow y-scale 2))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a))))))) angle) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/180 (* angle (PI))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 90 (/ (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (* (PI) (* (+ a b) (- b a))))) (* (pow angle 2) (- (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a))))))) angle) (taylor 0 angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (* (PI) (* (+ a b) (- b a))))) (* (pow angle 2) (- (+ (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* (pow angle 2) (- (* 90 (/ (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* -1/48600 (* (pow (PI) 2) (- (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a))))))) (* 1/87480000 (/ (* (pow (PI) 3) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a)))))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a))))))) angle) (taylor 0 angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (* (PI) (* (+ a b) (- b a))))) (* (pow angle 2) (- (+ (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* (pow angle 2) (- (+ (* 90 (/ (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* (pow angle 2) (- (* 90 (/ (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* -1/48600 (* (pow (PI) 2) (- (* 90 (/ (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* -1/48600 (* (pow (PI) 2) (- (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a))))))) (* 1/87480000 (/ (* (pow (PI) 3) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a)))))))) (+ (* -1/29760696000000 (/ (* (pow (PI) 5) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a)))) (* 1/7873200000 (* (pow (PI) 4) (- (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a)))))))))))) (+ (* -1/48600 (* (pow (PI) 2) (- (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a))))))) (* 1/87480000 (/ (* (pow (PI) 3) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a)))))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a))))))) angle) (taylor 0 angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* -1/4374000 (* (pow angle 2) (pow (PI) 3))) (* 1/90 (PI)))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* 1/708588000000 (* (pow angle 2) (pow (PI) 5))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/241061637600000000 (* (pow angle 2) (pow (PI) 7))) (* 1/708588000000 (pow (PI) 5)))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) (taylor 0 angle) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) (taylor 0 angle) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) (taylor 0 angle) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2))) (taylor 0 angle) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (pow b 2)) (taylor 0 angle) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (pow b 2)) (* (pow angle 2) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (taylor 0 angle) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (pow b 2)) (* (pow angle 2) (- (+ (* (pow angle 2) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2))) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (taylor 0 angle) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (pow b 2)) (* (pow angle 2) (- (+ (* (pow angle 2) (- (+ (* (pow angle 2) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2))) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2))) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (taylor 0 angle) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (+ (* -1 (pow b 2)) (pow b 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 angle) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 180 (/ (+ (* -1 (pow b 2)) (pow b 2)) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (- (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) angle) (taylor 0 angle) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 180 (/ (+ (* -1 (pow b 2)) (pow b 2)) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (- (+ (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (- (* 180 (/ (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) angle) (taylor 0 angle) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 180 (/ (+ (* -1 (pow b 2)) (pow b 2)) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (- (+ (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (- (+ (* 180 (/ (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (- (* 180 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) angle) (taylor 0 angle) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (taylor 0 angle) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))) (taylor 0 angle) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))))))) (taylor 0 angle) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow angle 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2)))))))))))))) (taylor 0 angle) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor inf angle) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor inf angle) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor inf angle) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor inf angle) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))) (taylor inf angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))) (taylor inf angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))) (taylor inf angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))) (taylor inf angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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))) (taylor inf angle) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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))) (taylor inf angle) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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))) (taylor inf angle) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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))) (taylor inf angle) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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)))) (taylor inf angle) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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)))) (taylor inf angle) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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)))) (taylor inf angle) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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)))) (taylor inf angle) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (taylor inf angle) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (taylor inf angle) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (taylor inf angle) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (taylor inf angle) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor -inf angle) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor -inf angle) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor -inf angle) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (taylor -inf angle) (#s(alt (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (patch (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))) (taylor -inf angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))) (taylor -inf angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))) (taylor -inf angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))) (taylor -inf angle) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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))) (taylor -inf angle) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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))) (taylor -inf angle) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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))) (taylor -inf angle) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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))) (taylor -inf angle) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) (patch (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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)))) (taylor -inf angle) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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)))) (taylor -inf angle) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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)))) (taylor -inf angle) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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)))) (taylor -inf angle) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale) (taylor 0 x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor 0 x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale) (taylor 0 x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) x-scale)) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor 0 x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a))))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a)))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a))))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a)))))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3) (- b a)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a))))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (taylor 0 x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (taylor 0 x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow x-scale 2) (- (+ (/ (* (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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (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)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (/ (* (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)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor 0 x-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor 0 x-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor 0 x-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor 0 x-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor inf x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale) (taylor inf x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale) (taylor inf x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) y-scale)) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor inf x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a)))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3) (- b a))))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a))))))) (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3) (- b a))))))) (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a)))))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (taylor inf x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (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))) (taylor inf x-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (/ (* (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)))) (taylor inf x-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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))))) (taylor inf x-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 6) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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)))))) (taylor inf x-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (taylor inf x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (+ (/ (* (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)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor inf x-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor inf x-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor inf x-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor inf x-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) y-scale)) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2)))))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2)))))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2)))))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor -inf x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a)))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3) (- b a))))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a))))))) (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3) (- b a))))))) (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a)))))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2))) (taylor -inf x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (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))) (taylor -inf x-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (/ (* (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)))) (taylor -inf x-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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))))) (taylor -inf x-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 6) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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)))))) (taylor -inf x-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))) (taylor -inf x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (+ (/ (* (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)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor -inf x-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor -inf x-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor -inf x-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor -inf x-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor 0 y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))) (taylor 0 y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))))))) (taylor 0 y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))) (taylor 0 y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) y-scale)) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (taylor 0 y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a))))))) (taylor 0 y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a)))))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3) (- b a))))))))) (taylor 0 y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a)))))) (* (pow y-scale 2) (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3) (- b a)))))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a))))))))))) (taylor 0 y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor 0 y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor 0 y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor 0 y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor 0 y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor 0 y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor 0 y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor 0 y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor 0 y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor 0 y-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor 0 y-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor 0 y-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor 0 y-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor inf y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor inf y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor inf y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) x-scale)) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2))))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2))))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2))))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (taylor inf y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a)))))))) (taylor inf y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a)))))))) (taylor inf y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))) (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3) (- b a))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a)))))))) (taylor inf y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor inf y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (taylor inf y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (taylor inf y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (taylor inf y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (taylor inf y-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor inf y-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor inf y-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (taylor inf y-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor inf y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (taylor inf y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (taylor inf y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (taylor inf y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor inf y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor inf y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor inf y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor inf y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor inf y-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor inf y-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor inf y-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor inf y-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor -inf y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor -inf y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor -inf y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) (patch (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) x-scale)) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale))))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale))))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale))))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (patch (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (patch (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (taylor -inf y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a)))))))) (taylor -inf y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a)))))))) (taylor -inf y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))) (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3) (- b a))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a)))))))) (taylor -inf y-scale) (#s(alt (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) (patch (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (taylor -inf y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (taylor -inf y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (taylor -inf y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) (patch (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (taylor -inf y-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor -inf y-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor -inf y-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (taylor -inf y-scale) (#s(alt #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) (patch #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (taylor -inf y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* (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))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (taylor -inf y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (taylor -inf y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (taylor -inf y-scale) (#s(alt (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) (patch (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (patch (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor -inf y-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor -inf y-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor -inf y-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))) (taylor -inf y-scale) (#s(alt (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (patch (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
Calls

15 calls:

TimeVariablePointExpression
86.0ms
b
@inf
((* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 2 (* (PI) (* 1/180 angle))) (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 180 (/ (atan (* (/ (- (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (* y-scale x-scale))) (PI))) (pow b 2) (pow a 2) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (cos (* (* (PI) angle) 1/180)) (sin (* (* (PI) angle) 1/180)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/ (* a a) (* y-scale y-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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (- (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (sin (* 2 (* (PI) (* 1/180 angle)))) (cos (* 2 (* (PI) (* 1/180 angle)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (cos (* (/ angle 180) (PI))) (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)))
83.0ms
angle
@-inf
((* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 2 (* (PI) (* 1/180 angle))) (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 180 (/ (atan (* (/ (- (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (* y-scale x-scale))) (PI))) (pow b 2) (pow a 2) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (cos (* (* (PI) angle) 1/180)) (sin (* (* (PI) angle) 1/180)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/ (* a a) (* y-scale y-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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (- (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (sin (* 2 (* (PI) (* 1/180 angle)))) (cos (* 2 (* (PI) (* 1/180 angle)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (cos (* (/ angle 180) (PI))) (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)))
62.0ms
angle
@0
((* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 2 (* (PI) (* 1/180 angle))) (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 180 (/ (atan (* (/ (- (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (* y-scale x-scale))) (PI))) (pow b 2) (pow a 2) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (cos (* (* (PI) angle) 1/180)) (sin (* (* (PI) angle) 1/180)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/ (* a a) (* y-scale y-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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (- (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (sin (* 2 (* (PI) (* 1/180 angle)))) (cos (* 2 (* (PI) (* 1/180 angle)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (cos (* (/ angle 180) (PI))) (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)))
55.0ms
a
@0
((* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 2 (* (PI) (* 1/180 angle))) (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 180 (/ (atan (* (/ (- (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (* y-scale x-scale))) (PI))) (pow b 2) (pow a 2) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (cos (* (* (PI) angle) 1/180)) (sin (* (* (PI) angle) 1/180)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/ (* a a) (* y-scale y-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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (- (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (sin (* 2 (* (PI) (* 1/180 angle)))) (cos (* 2 (* (PI) (* 1/180 angle)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (cos (* (/ angle 180) (PI))) (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)))
48.0ms
angle
@inf
((* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 2 (* (PI) (* 1/180 angle))) (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* 180 (/ (atan (* (/ (- (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (* y-scale x-scale))) (PI))) (pow b 2) (pow a 2) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (cos (* (* (PI) angle) 1/180)) (sin (* (* (PI) angle) 1/180)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/ (* a a) (* y-scale y-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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (- (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a))) (* y-scale y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (sin (* 2 (* (PI) (* 1/180 angle)))) (cos (* 2 (* (PI) (* 1/180 angle)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (cos (* (/ angle 180) (PI))) (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)))

simplify1.8s (1.2%)

Memory
84.0MiB live, 2 717.2MiB allocated
Algorithm
1×egg-herbie
Rules
6 694×lower-*.f64
6 694×lower-*.f32
4 798×lower-+.f64
4 798×lower-+.f32
3 556×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03936444220
08078437641
Stop Event
1×iter limit
1×node limit
Counts
1 620 → 1 620
Calls
Call 1
Inputs
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))
(+ (/ (* (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)))
(+ (/ (* (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)))
(+ (/ (* (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)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* b (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (* b (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI))))))))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* 2 (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* b (* x-scale (+ a (* -1 a)))) (* (pow a 2) (* angle (* y-scale (PI)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI))))))))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))) (pow a 2))) (/ (* x-scale (+ a (* -1 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))) (* 2 (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))))))))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow a 2) (sin (* 1/90 (* angle (PI)))))))
(+ (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (* b (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI)))))))))
(+ (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (* b (- (+ (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* b (- (+ (* -1 (/ (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ 1 (* (pow a 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* (/ 1 (* (pow a 4) (sin (* 1/90 (* angle (PI)))))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI)))))))) (pow a 2))) (+ (* 1/2 (/ 1 (* (pow a 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow a 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))))))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI)))))))))
(+ (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (* b (- (+ (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* b (- (+ (* -1 (/ (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ 1 (* (pow a 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* b (- (* 1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (+ (* -1 (/ (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ 1 (* (pow a 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* (/ 1 (* (pow a 4) (sin (* 1/90 (* angle (PI)))))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI)))))))) (pow a 2))) (+ (* 1/2 (/ 1 (* (pow a 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow a 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))))))))) (pow a 2))) (* -1 (/ (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI))))))) (pow a 2)))))) (* (/ 1 (* (pow a 4) (sin (* 1/90 (* angle (PI)))))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI)))))))) (pow a 2))) (+ (* 1/2 (/ 1 (* (pow a 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow a 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))))))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI)))))))))
(- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))
(- (+ (* -1/2 (* (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))
(- (+ (* b (- (* b (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))
(- (+ (* b (- (* b (- (+ (* -1/2 (* (* b (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ 1 (pow y-scale 2)))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))
(sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
(- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(- (+ (* (pow b 2) (- (+ (* -1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(- (+ (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))
(+ (* 4 (/ (* b (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow a 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(+ (* b (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow a 2))) (* b (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(+ (* b (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow a 2))) (* b (- (+ (* b (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* b (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* b (- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))))) (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* b (- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (- (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* b (- (* -1/2 (/ (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))))) (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))))) (pow a 2))) (* -1 (/ (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))))) (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
(+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
(+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))) (* b (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)))))))))
(+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))) (* b (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (+ (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* -2 (/ (+ (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI))))) (* (+ a (* -1 a)) (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(/ (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sin (* 1/90 (* angle (PI)))))
(- (+ (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ 1/2 (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (sin (* 1/90 (* angle (PI))))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (+ (/ 1/2 (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* b (sin (* 1/90 (* angle (PI)))))))))))
(- (+ (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (/ 1/2 (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (sin (* 1/90 (* angle (PI))))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (+ (/ 1/2 (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))) (+ (/ (* (+ a (* -1 a)) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) (pow b 2)) (+ (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* b (sin (* 1/90 (* angle (PI)))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))))))))))))
(- (+ (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* -1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* (pow b 3) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (/ 1/2 (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))))) (+ (* -1 (/ (* (pow a 2) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) (pow b 3))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (sin (* 1/90 (* angle (PI))))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (+ (/ 1/2 (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))) (+ (/ (* (+ a (* -1 a)) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) (pow b 2)) (+ (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* b (sin (* 1/90 (* angle (PI)))))) (+ (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI)))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (sin (* 1/90 (* angle (PI))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* (+ a (* -1 a)) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))))))) (pow b 3)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))))))))))))))
(* (pow b 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(* (pow b 2) (- (+ (* -1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* 1/2 (/ 1 (pow y-scale 2)))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2)))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow b 2)) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2)))))))))))
(* (pow b 2) (- (+ (* -1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow b 3)) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow b 2)) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2)))))))))))
(* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
(* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(/ (* (pow b 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow b 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
(* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow b 3))) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (* (pow b 3) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))
(/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(- (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(- (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))))) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))
(- (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 1/2 (/ (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 3) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 3))) (+ (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* (+ a (* -1 a)) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)) (/ (* (+ a (* -1 a)) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (+ a (* -1 a)) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 3)))))))
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow b 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow b 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 3) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* 180 (/ (atan (* -1 (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a (* -1 b)) 2) (pow (- a (* -1 b)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a (* -1 b)) (- a (* -1 b))))))) (PI)))
(* 180 (/ (atan (* -1 (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a (* -1 b)) 2) (pow (- a (* -1 b)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a (* -1 b)) (- a (* -1 b))))))) (PI)))
(* 180 (/ (atan (* -1 (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a (* -1 b)) 2) (pow (- a (* -1 b)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a (* -1 b)) (- a (* -1 b))))))) (PI)))
(* 180 (/ (atan (* -1 (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a (* -1 b)) 2) (pow (- a (* -1 b)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a (* -1 b)) (- a (* -1 b))))))) (PI)))
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (+ (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) b))) b)) (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) b))) b)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI)))))) b))) b))) b)))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(/ (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sin (* 1/90 (* angle (PI)))))
(- (+ (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ 1/2 (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (sin (* 1/90 (* angle (PI))))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (+ (/ 1/2 (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* b (sin (* 1/90 (* angle (PI)))))))))))
(- (+ (* -1 (/ (- (+ (* -1 (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* b (sin (* 1/90 (* angle (PI)))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) b)) (/ (* (pow a 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* b (sin (* 1/90 (* angle (PI)))))))) b)) (/ 1/2 (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (sin (* 1/90 (* angle (PI))))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (/ 1/2 (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))))))
(- (+ (* -1 (/ (+ (* -1 (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) (* -1 (/ (- (+ (* -1 (- (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (* (+ a (* -1 a)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI)))))))) (/ (* (pow a 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI)))))))) (* 1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* b (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (* (+ a (* -1 a)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI)))))))) (/ (* (pow a 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI)))))))) b)) (* -1 (/ (* (pow a 2) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) b)))) b))) b)) (/ 1/2 (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (sin (* 1/90 (* angle (PI))))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (/ 1/2 (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))))))
(* (pow b 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(* (pow b 2) (- (+ (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* 1/2 (/ 1 (pow y-scale 2)))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(* (pow b 2) (- (+ (* -1 (/ (- (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) b)) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) b)) (* 1/2 (/ 1 (pow y-scale 2)))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(* (pow b 2) (- (+ (* -1 (/ (- (* -1 (/ (- (+ (* 1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) b) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) b)) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) b)) (* 1/2 (/ 1 (pow y-scale 2)))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
(* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(/ (* (pow b 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow b 2) (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* (pow b 2) (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) b)) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* (pow b 2) (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) b)) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) b)) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(- (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* -1 (/ (- (+ (* -1 (- (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) b)) (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (+ (* -1 (- (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (- (+ (* -1 (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (* (+ a (* -1 a)) (- (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* -1/2 (/ (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (* (+ a (* -1 a)) (- (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) b)) (* -1 (/ (* (pow a 2) (- (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) b)))) b))) b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
(* (pow b 4) (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (pow y-scale 2)))) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))
(+ (/ (* (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)))
(+ (/ (* (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)))
(+ (/ (* (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)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* a (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (* a (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))))
(+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -2 (* a (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (pow b 2))))) (* 2 (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* a (* y-scale (+ b (* -1 b)))) (* angle (* (pow b 2) (* x-scale (PI)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (* a (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))) (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))) (* a (+ (* -2 (* a (+ (* -1 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 4) (* x-scale (PI)))))) (/ (* (+ b (* -1 b)) (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))) (pow b 2))))) (* 2 (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))))))))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(/ (pow a 2) (pow y-scale 2))
(/ (pow a 2) (pow y-scale 2))
(/ (pow a 2) (pow y-scale 2))
(/ (pow a 2) (pow y-scale 2))
(/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow b 2) (sin (* 1/90 (* angle (PI))))))
(- (+ (* a (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI)))))))) (/ (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))))
(- (+ (* a (- (+ (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* a (- (+ (* 1/2 (/ 1 (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))))) (+ (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow b 4) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ 1 (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI)))))))) (pow b 2)))))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI)))))))) (/ (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))))
(- (+ (* a (- (+ (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* a (- (+ (* 1/2 (/ 1 (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* a (- (* -1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* -1 (/ (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI))))))) (pow b 2))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))))) (+ (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow b 4) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ 1 (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI)))))))) (pow b 2))))))) (pow b 2)))))))) (+ (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow b 4) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ 1 (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI)))))))) (pow b 2)))))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI)))))))) (/ (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))))
(- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))
(- (+ (* -1/2 (* (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))
(- (+ (* a (- (* a (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))
(- (+ (* a (- (* a (- (+ (* -1/2 (* (* a (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))
(sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
(- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(- (+ (* (pow a 2) (- (+ (* -1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow b 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(+ (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow b 2))) (* a (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(+ (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow b 2))) (* a (- (+ (* a (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) (+ (* a (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) (+ (* a (- (+ (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* (+ b (* -1 b)) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) (+ (* a (- (+ (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* a (- (* 1/2 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* (+ b (* -1 b)) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))) (pow b 2))))) (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* (+ b (* -1 b)) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
(+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
(+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))) (* a (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)))))))))
(+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))) (* a (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2)))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (pow a 3))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))))))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) (pow a 3))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(/ (pow a 2) (pow y-scale 2))
(/ (pow a 2) (pow y-scale 2))
(/ (pow a 2) (pow y-scale 2))
(/ (pow a 2) (pow y-scale 2))
(* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI))))))
(- (+ (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI)))))) (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* a (sin (* 1/90 (* angle (PI)))))))
(- (+ (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (+ (* -1 (/ (* (+ b (* -1 b)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI))))))) (pow a 2))) (+ (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* a (sin (* 1/90 (* angle (PI)))))) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/90 (* angle (PI)))))))))
(- (+ (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (* 1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* (pow a 3) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (* -1 (/ (* (+ b (* -1 b)) (- (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (* (+ b (* -1 b)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))))) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))))) (pow a 3))) (+ (* -1 (/ (* (+ b (* -1 b)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI))))))) (pow a 2))) (+ (* -1 (/ (* (pow b 2) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI))))))) (pow a 3))) (+ (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* a (sin (* 1/90 (* angle (PI)))))) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/90 (* angle (PI)))))))))))
(* (pow a 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))))
(* (pow a 2) (- (+ (* -1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))))
(* (pow a 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2)))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (pow a 2)) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2)))))))))
(* (pow a 2) (- (+ (* -1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (pow a 3)) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2))))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (pow a 2)) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2)))))))))
(* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
(* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(/ (* (pow a 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2))
(* (pow a 2) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* (pow a 2) (- (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))))
(* (pow a 2) (- (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow a 3))) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (* (pow a 3) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))))
(* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (+ (* -1 (/ (* (+ b (* -1 b)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))) (+ (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1/2 (/ (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 3) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (+ (* -1 (/ (* (+ b (* -1 b)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))) (+ (* -1 (/ (* (+ b (* -1 b)) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (* (+ b (* -1 b)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 3))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 3))) (+ (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow a 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow a 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 3) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ b (* -1 a)) 2) (pow (- b (* -1 a)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ b (* -1 a)) (- b (* -1 a)))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ b (* -1 a)) 2) (pow (- b (* -1 a)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ b (* -1 a)) (- b (* -1 a)))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ b (* -1 a)) 2) (pow (- b (* -1 a)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ b (* -1 a)) (- b (* -1 a)))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ b (* -1 a)) 2) (pow (- b (* -1 a)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ b (* -1 a)) (- b (* -1 a)))))) (PI)))
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* 2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a))) a)))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* 2 (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) a))) a))) a)))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) a))) a)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -1 (/ (+ (* 2 (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) a))) a))) a)))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(/ (pow a 2) (pow y-scale 2))
(/ (pow a 2) (pow y-scale 2))
(/ (pow a 2) (pow y-scale 2))
(/ (pow a 2) (pow y-scale 2))
(* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI))))))
(+ (* -1 (/ (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))) a)) (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI)))))))
(+ (* -1 (/ (- (+ (* -1 (/ (- (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (* (+ b (* -1 b)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))))) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI))))))) a)) (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))) a)) (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI)))))))
(+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* 1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (sin (* 1/90 (* angle (PI))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (* (+ b (* -1 b)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))))) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI))))))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))))))) a)) (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (sin (* 1/90 (* angle (PI))))))) (+ (* -1 (* (+ b (* -1 b)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))))) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI))))))) a)) (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))) a)) (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI)))))))
(* (pow a 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))))
(* (pow a 2) (- (+ (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))))
(* (pow a 2) (- (+ (* -1 (/ (- (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) a)) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) a)) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))))
(* (pow a 2) (- (+ (* -1 (/ (- (* -1 (/ (- (+ (* 1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) a) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) a)) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) a)) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))))
(* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
(* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(/ (* (pow a 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2))
(* (pow a 2) (+ (* -4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* (pow a 2) (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4))) a)) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* (pow a 2) (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) a)) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4))) a)) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) a)))
(+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (* (+ b (* -1 b)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) a))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) a)))
(+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (- (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (- (* -1/2 (/ (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (* (+ b (* -1 b)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* -1 (* (pow b 2) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) a))) (+ (* -1 (* (+ b (* -1 b)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) a))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) a)))
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
(* (pow a 4) (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (pow y-scale 2)))) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/32400 (* (pow angle 2) (pow (PI) 2)))
(* (pow angle 2) (- (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* -1/32400 (pow (PI) 2))))
(* (pow angle 2) (- (* (pow angle 2) (- (* 1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4)))) (* -1/32400 (pow (PI) 2))))
(* (pow angle 2) (- (* (pow angle 2) (- (* (pow angle 2) (- (* -1/347128758144000000000 (* (pow angle 2) (pow (PI) 8))) (* -1/765275040000000 (pow (PI) 6)))) (* 1/3149280000 (pow (PI) 4)))) (* -1/32400 (pow (PI) 2))))
1
(+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/3149280000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4)))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(/ (pow a 2) (pow y-scale 2))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow a 2) (pow y-scale 2)))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (/ (pow a 2) (pow y-scale 2)))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))))) (/ (pow a 2) (pow y-scale 2)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a))))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle)
1
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(* 1/180 (* angle (PI)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))
(* 1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2))))
(* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))
(* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))
(* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 90 (/ (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (* (+ a b) (- b a))))))
(/ (+ (* 90 (/ (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (* (PI) (* (+ a b) (- b a))))) (* (pow angle 2) (- (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a))))))) angle)
(/ (+ (* 90 (/ (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (* (PI) (* (+ a b) (- b a))))) (* (pow angle 2) (- (+ (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* (pow angle 2) (- (* 90 (/ (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* -1/48600 (* (pow (PI) 2) (- (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a))))))) (* 1/87480000 (/ (* (pow (PI) 3) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a)))))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a))))))) angle)
(/ (+ (* 90 (/ (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (* (PI) (* (+ a b) (- b a))))) (* (pow angle 2) (- (+ (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* (pow angle 2) (- (+ (* 90 (/ (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* (pow angle 2) (- (* 90 (/ (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* -1/48600 (* (pow (PI) 2) (- (* 90 (/ (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* -1/48600 (* (pow (PI) 2) (- (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a))))))) (* 1/87480000 (/ (* (pow (PI) 3) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a)))))))) (+ (* -1/29760696000000 (/ (* (pow (PI) 5) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a)))) (* 1/7873200000 (* (pow (PI) 4) (- (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a)))))))))))) (+ (* -1/48600 (* (pow (PI) 2) (- (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a))))))) (* 1/87480000 (/ (* (pow (PI) 3) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a)))))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a))))))) angle)
(- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(* 1/90 (* angle (PI)))
(* angle (+ (* -1/4374000 (* (pow angle 2) (pow (PI) 3))) (* 1/90 (PI))))
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* 1/708588000000 (* (pow angle 2) (pow (PI) 5)))))))
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/241061637600000000 (* (pow angle 2) (pow (PI) 7))) (* 1/708588000000 (pow (PI) 5))))))))
1
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4)))))))
(- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))
(- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))
(- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))
(- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))
(- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))
1
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(* -2 (pow b 2))
(+ (* -2 (pow b 2)) (* (pow angle 2) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))
(+ (* -2 (pow b 2)) (* (pow angle 2) (- (+ (* (pow angle 2) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2))) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))
(+ (* -2 (pow b 2)) (* (pow angle 2) (- (+ (* (pow angle 2) (- (+ (* (pow angle 2) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2))) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2))) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))
(* 180 (/ (+ (* -1 (pow b 2)) (pow b 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* 180 (/ (+ (* -1 (pow b 2)) (pow b 2)) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (- (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) angle)
(/ (+ (* 180 (/ (+ (* -1 (pow b 2)) (pow b 2)) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (- (+ (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (- (* 180 (/ (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) angle)
(/ (+ (* 180 (/ (+ (* -1 (pow b 2)) (pow b 2)) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (- (+ (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (- (+ (* 180 (/ (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (- (* 180 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) angle)
(* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))
(+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))
(+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))))))))
(+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow angle 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))
(/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))
(/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))
(/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))
(/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))
(/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))
(/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale)
(/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale)
(/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale)
(* -1 (/ (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* -1 (/ (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a))))))))) (pow x-scale 2))
(/ (+ (* -1 (/ (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a)))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a))))))))) (pow x-scale 2))
(/ (+ (* -1 (/ (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a)))))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3) (- b a)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a))))))))) (pow x-scale 2))
(* -1 (/ (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))
(/ (- (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow x-scale 2))
(/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow x-scale 2))
(/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2))
(* -1 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))
(/ (- (* (pow x-scale 2) (- (+ (/ (* (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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (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)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (/ (* (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)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))
(* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a)))))))) (pow x-scale 2))
(/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3) (- b a))))))))) (pow x-scale 2))
(/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a))))))) (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3) (- b a))))))) (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a)))))))))) (pow x-scale 2))
(* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))
(/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow x-scale 2))
(/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow x-scale 2))
(+ (/ (* (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)))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (/ (* (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))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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)))))
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 6) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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))))))
(* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))
(/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))
(/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (+ (/ (* (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)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2))))))
(* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a)))))))) (pow x-scale 2))
(/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3) (- b a))))))))) (pow x-scale 2))
(/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a))))))) (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3) (- b a))))))) (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a)))))))))) (pow x-scale 2))
(* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))
(/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow x-scale 2))
(/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow x-scale 2))
(+ (/ (* (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)))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (/ (* (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))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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)))))
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 6) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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))))))
(* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))
(/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))
(/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (+ (/ (* (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)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale)
(/ (pow a 2) (pow y-scale 2))
(/ (pow a 2) (pow y-scale 2))
(/ (pow a 2) (pow y-scale 2))
(/ (pow a 2) (pow y-scale 2))
(* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))))
(+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a)))))))
(+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a)))))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3) (- b a)))))))))
(+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a)))))) (* (pow y-scale 2) (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3) (- b a)))))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a)))))))))))
(* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2))
(* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2)))))
(* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2)))))
(* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2)))))
(/ (pow a 2) (pow y-scale 2))
(/ (pow a 2) (pow y-scale 2))
(/ (pow a 2) (pow y-scale 2))
(/ (pow a 2) (pow y-scale 2))
(* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))))
(- (+ (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))))
(- (+ (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))))
(- (+ (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))) (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3) (- b a))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))))
(* -1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))
(- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))
(- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (+ (/ (* (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))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale)))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale)))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale)))))
(/ (pow a 2) (pow y-scale 2))
(/ (pow a 2) (pow y-scale 2))
(/ (pow a 2) (pow y-scale 2))
(/ (pow a 2) (pow y-scale 2))
(* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))))
(- (+ (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))))
(- (+ (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))))
(- (+ (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))) (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3) (- b a))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))))
(* -1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))
(- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))
(- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(- (+ (/ (* (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))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
Outputs
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.f64 (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a)))) (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.f64 (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a)))) (*.f64 a a)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.f64 (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.f64 (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a)))) (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.f64 (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a)))) (*.f64 a a)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.f64 (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a))))))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.f64 (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a)))) (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.f64 (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a)))) (*.f64 a a)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.f64 (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a))))))))))
(/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-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)))
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-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)))
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-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)))
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 b b) (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.f64 (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a)))) (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.f64 (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a)))) (*.f64 a a)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.f64 (-.f64 (neg.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a))))))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* -2 (/ (* b (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))
(*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 b (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) a)))) (*.f64 (*.f64 a a) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (* b (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI))))))))))))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) a))) (*.f64 (*.f64 a a) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (neg.f64 (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* 2 (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) a))) (*.f64 (*.f64 a a) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (fma.f64 #s(literal -2 binary64) (*.f64 b (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (neg.f64 (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 a a))) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 2 binary64) (-.f64 (neg.f64 (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 a a) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a)))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* b (* x-scale (+ a (* -1 a)))) (* (pow a 2) (* angle (* y-scale (PI)))))))
(*.f64 #s(literal -2 binary64) (+.f64 (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 b (*.f64 x-scale (*.f64 #s(literal 0 binary64) a))) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI))))))))))))
(fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))) (pow a 2))) (/ (* x-scale (+ a (* -1 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))) (* 2 (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))))))))
(fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 b (fma.f64 #s(literal -2 binary64) (*.f64 b (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (*.f64 a a))) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))))))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale)))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale)))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale)))
(* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow a 2) (sin (* 1/90 (* angle (PI)))))))
(neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))
(+ (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (* b (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI)))))))))
(+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))
(+ (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (* b (- (+ (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* b (- (+ (* -1 (/ (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ 1 (* (pow a 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* (/ 1 (* (pow a 4) (sin (* 1/90 (* angle (PI)))))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI)))))))) (pow a 2))) (+ (* 1/2 (/ 1 (* (pow a 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow a 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))))))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI)))))))))
(+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 b (-.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))
(+ (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (* b (- (+ (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* b (- (+ (* -1 (/ (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ 1 (* (pow a 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* b (- (* 1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (+ (* -1 (/ (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ 1 (* (pow a 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* (/ 1 (* (pow a 4) (sin (* 1/90 (* angle (PI)))))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI)))))))) (pow a 2))) (+ (* 1/2 (/ 1 (* (pow a 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow a 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))))))))) (pow a 2))) (* -1 (/ (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI))))))) (pow a 2)))))) (* (/ 1 (* (pow a 4) (sin (* 1/90 (* angle (PI)))))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI)))))))) (pow a 2))) (+ (* 1/2 (/ 1 (* (pow a 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow a 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow a 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))))))))) (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow a 4) (sin (* 1/90 (* angle (PI)))))))))
(+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 b (-.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 a a))) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))
(- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))
(-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))
(- (+ (* -1/2 (* (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))
(-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))
(- (+ (* b (- (* b (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))
(-.f64 (fma.f64 b (fma.f64 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))
(- (+ (* b (- (* b (- (+ (* -1/2 (* (* b (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ 1 (pow y-scale 2)))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))
(-.f64 (fma.f64 b (fma.f64 b (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 b (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))
(sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
(+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))))
(- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))
(- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(-.f64 (fma.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))
(- (+ (* (pow b 2) (- (+ (* -1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(-.f64 (fma.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))
(- (+ (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(-.f64 (fma.f64 (*.f64 b b) (-.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 b b) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))
(/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))
(/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(+ (* 4 (/ (* b (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow a 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64)))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(+ (* b (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow a 2))) (* b (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(fma.f64 b (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 a a)) (*.f64 b (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.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)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #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))))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(+ (* b (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow a 2))) (* b (- (+ (* b (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(fma.f64 b (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 a a)) (*.f64 b (-.f64 (fma.f64 b (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 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 2 binary64)))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.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)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #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))))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
(+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* b (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (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)))))))))))
(+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* b (- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))))) (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.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)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #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))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (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 a a))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (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)))))))))))
(+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* b (- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (- (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* b (- (* -1/2 (/ (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow a 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))))) (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))))) (pow a 2))) (* -1 (/ (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 6) (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))))) (/ (sin (* 1/180 (* angle (PI)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b (-.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.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)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #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))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 a a)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 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 2 binary64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.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)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #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))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (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 a a))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 a a))) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (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 a a))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (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 a a))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (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)))))))))))
(+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
(*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))
(+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 b (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))))
(+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))) (* b (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)))))))))
(fma.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64) (*.f64 b (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 a a) a) #s(literal 0 binary64)))) (*.f64 y-scale y-scale)) (*.f64 b (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))))))
(+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow y-scale 2))) (* b (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (+ (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))))))))
(fma.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64) (*.f64 b (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 a a) a) #s(literal 0 binary64)))) (*.f64 y-scale y-scale)) (*.f64 b (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 b (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (+.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.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 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (+.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.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 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (+.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.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 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))))
(/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (+.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.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 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) a))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) a))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (neg.f64 (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) a))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (neg.f64 (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) a)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) b)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (neg.f64 (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(fma.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))
(fma.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64))))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))) (*.f64 b b)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* -2 (/ (+ (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI))))) (* (+ a (* -1 a)) (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))
(fma.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (*.f64 #s(literal 0 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (*.f64 (*.f64 b b) b)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64))))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))) (*.f64 b b))))))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) y-scale)))))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) y-scale)))))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) y-scale)))))
(/ (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sin (* 1/90 (* angle (PI)))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))
(- (+ (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ 1/2 (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (sin (* 1/90 (* angle (PI))))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (+ (/ 1/2 (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* b (sin (* 1/90 (* angle (PI)))))))))))
(-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))
(- (+ (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (/ 1/2 (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (sin (* 1/90 (* angle (PI))))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (+ (/ 1/2 (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))) (+ (/ (* (+ a (* -1 a)) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) (pow b 2)) (+ (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* b (sin (* 1/90 (* angle (PI)))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))))))))))))
(-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b b)) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))))
(- (+ (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* -1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* (pow b 3) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (/ 1/2 (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))))) (+ (* -1 (/ (* (pow a 2) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) (pow b 3))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (sin (* 1/90 (* angle (PI))))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (+ (/ 1/2 (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))) (+ (/ (* (+ a (* -1 a)) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) (pow b 2)) (+ (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* b (sin (* 1/90 (* angle (PI)))))) (+ (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (/ (* (pow a 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI)))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (sin (* 1/90 (* angle (PI))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* (+ a (* -1 a)) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))))))) (pow b 3)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))))))))))))))
(-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (*.f64 b b) b) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) b))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b b)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (fma.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (*.f64 b b) b)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))))
(* (pow b 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (+ (* -1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* 1/2 (/ 1 (pow y-scale 2)))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2)))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow b 2)) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2)))))))))))
(*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))))
(* (pow b 2) (- (+ (* -1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow b 3)) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow b 2)) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (pow x-scale 2)))))))))))
(*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))))))
(* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
(*.f64 (*.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(*.f64 (*.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(*.f64 (*.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(*.f64 (*.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))
(* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))
(* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (*.f64 b b) (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(/ (* (pow b 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))
(/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow b 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) b) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))
(*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) b) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
(* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow b 3))) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (* (pow b 3) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))
(*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) b) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (*.f64 b b) b)) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (*.f64 (*.f64 b b) b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
(/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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)))))))
(- (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.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 3 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
(- (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))))) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.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 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 b b))))
(- (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 1/2 (/ (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 3) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 3))) (+ (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* (+ a (* -1 a)) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)) (/ (* (+ a (* -1 a)) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (+ a (* -1 a)) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 3)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.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 3 binary64))))) (fma.f64 #s(literal 1/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 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) (+.f64 (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 b b) b)))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 b b))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 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 (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 0 binary64) a) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 b b) b)))))
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow b 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow b 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow b 3) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 b b)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 a a) a) #s(literal 0 binary64)))) (*.f64 (*.f64 (*.f64 b b) b) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (+.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.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 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (+.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.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 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))))
(* 180 (/ (atan (* -1 (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a (* -1 b)) 2) (pow (- a (* -1 b)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a (* -1 b)) (- a (* -1 b))))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a (neg.f64 b)) (+.f64 a (neg.f64 b))) (*.f64 (-.f64 a (neg.f64 b)) (-.f64 a (neg.f64 b))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a (neg.f64 b)) (-.f64 a (neg.f64 b))))))) (PI.f64)))
(* 180 (/ (atan (* -1 (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a (* -1 b)) 2) (pow (- a (* -1 b)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a (* -1 b)) (- a (* -1 b))))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a (neg.f64 b)) (+.f64 a (neg.f64 b))) (*.f64 (-.f64 a (neg.f64 b)) (-.f64 a (neg.f64 b))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a (neg.f64 b)) (-.f64 a (neg.f64 b))))))) (PI.f64)))
(* 180 (/ (atan (* -1 (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a (* -1 b)) 2) (pow (- a (* -1 b)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a (* -1 b)) (- a (* -1 b))))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a (neg.f64 b)) (+.f64 a (neg.f64 b))) (*.f64 (-.f64 a (neg.f64 b)) (-.f64 a (neg.f64 b))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a (neg.f64 b)) (-.f64 a (neg.f64 b))))))) (PI.f64)))
(* 180 (/ (atan (* -1 (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a (* -1 b)) 2) (pow (- a (* -1 b)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (+ (* 1/2 (/ (pow b 2) (pow y-scale 2))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow b 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow b 2) (pow x-scale 2))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a (* -1 b)) (- a (* -1 b))))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a (neg.f64 b)) (+.f64 a (neg.f64 b))) (*.f64 (-.f64 a (neg.f64 b)) (-.f64 a (neg.f64 b))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a (neg.f64 b)) (-.f64 a (neg.f64 b))))))) (PI.f64)))
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (+.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.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 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))))
(/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (+.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.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 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) a))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(+ (* -1 (/ (+ (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) a))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b))) b)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) b))) b)) (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) a)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) b))) b)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) a))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) b)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(fma.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) b))) b)))
(fma.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))) (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 angle (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64))))) (+.f64 (neg.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64))))))) b))) b)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI)))))) b))) b))) b)))
(fma.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))) (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 angle (*.f64 x-scale (PI.f64)))) (neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64))))) (+.f64 (neg.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64))))))) (/.f64 (*.f64 #s(literal -1 binary64) (fma.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64))))) (+.f64 (neg.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64))))) (neg.f64 (/.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64))))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 y-scale (*.f64 #s(literal 0 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64)))))) b))) b))) b)))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) y-scale)))))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) y-scale)))))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) y-scale)))))
(/ (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sin (* 1/90 (* angle (PI)))))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))
(- (+ (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ 1/2 (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (sin (* 1/90 (* angle (PI))))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (+ (/ 1/2 (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* b (sin (* 1/90 (* angle (PI)))))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))
(- (+ (* -1 (/ (- (+ (* -1 (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* b (sin (* 1/90 (* angle (PI)))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) b)) (/ (* (pow a 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (* b (sin (* 1/90 (* angle (PI)))))))) b)) (/ 1/2 (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (sin (* 1/90 (* angle (PI))))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (/ 1/2 (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))))))
(-.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) b)) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) b)) (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))
(- (+ (* -1 (/ (+ (* -1 (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) (* -1 (/ (- (+ (* -1 (- (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (* (+ a (* -1 a)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI)))))))) (/ (* (pow a 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI)))))))) (* 1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* b (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (* (+ a (* -1 a)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI)))))))) (/ (* (pow a 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI)))))))) b)) (* -1 (/ (* (pow a 2) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (+ a (* -1 a)) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sin (* 1/90 (* angle (PI))))))) b)))) b))) b)) (/ 1/2 (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (sin (* 1/90 (* angle (PI))))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (/ 1/2 (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))))))
(-.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (*.f64 b (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) b)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) b)))) b))) b)) (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))
(* (pow b 2) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (+ (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* 1/2 (/ 1 (pow y-scale 2)))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 b (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (neg.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))
(* (pow b 2) (- (+ (* -1 (/ (- (* -1 (/ (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) b)) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) b)) (* 1/2 (/ 1 (pow y-scale 2)))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(*.f64 (*.f64 b b) (-.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) b)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))
(* (pow b 2) (- (+ (* -1 (/ (- (* -1 (/ (- (+ (* 1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) b) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) b)) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) b)) (* 1/2 (/ 1 (pow y-scale 2)))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(*.f64 (*.f64 b b) (-.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) b) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) b)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) b)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))
(* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
(*.f64 (*.f64 b b) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(*.f64 (*.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(*.f64 (*.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
(* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(*.f64 (*.f64 b b) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))
(* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))
(* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (*.f64 b b) (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 b #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(/ (* (pow b 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2))
(/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow b 2) (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) b) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* (pow b 2) (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) b)) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(*.f64 (*.f64 b b) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) b)) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))))) b)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* (pow b 2) (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) b)) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4))) b)) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) b)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(*.f64 (*.f64 b b) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) b)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) b)) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))))) b)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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)))))))
(- (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.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 3 binary64))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
(+ (* -1 (/ (- (+ (* -1 (- (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) b)) (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+.f64 (neg.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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))))))))) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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))))))))) b)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) b)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.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 3 binary64))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(+ (* -1 (/ (+ (* -1 (- (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (- (+ (* -1 (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (* (+ a (* -1 a)) (- (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* -1/2 (/ (- (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (* (+ a (* -1 a)) (- (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) b)) (* -1 (/ (* (pow a 2) (- (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 a) (* 2 a))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ a (* -1 a)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) b)))) b))) b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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))))))))) (neg.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (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 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a a) a) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 a a) (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 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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)))))))))) b)) (neg.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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))))))))) b)))) b))) b)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.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 3 binary64))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))
(* (pow b 4) (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (pow y-scale 2)))) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 b (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)))) b)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 y-scale y-scale)))) b)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* b (pow y-scale 2)))) (+ (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (pow y-scale 2))))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow y-scale 2)))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 a a) a) #s(literal 0 binary64)))) (*.f64 b (*.f64 y-scale y-scale))) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) b)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 y-scale y-scale)))) b)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (fma.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))) (*.f64 b b)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (fma.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))) (*.f64 b b)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b))))))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (fma.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))) (*.f64 b b)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b))))))))))
(/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-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)))
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-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)))
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-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)))
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))) (-.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (fma.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b)))) (*.f64 b b)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (/.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)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 b b) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale)))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 b b))))))))))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* -2 (/ (* a (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) b)))) (*.f64 (*.f64 b b) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (* a (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 a (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) b))) (*.f64 (*.f64 b b) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 2 binary64) (*.f64 a (-.f64 (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (neg.f64 (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))))
(+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -2 (* a (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (pow b 2))))) (* 2 (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 a (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) b))) (*.f64 (*.f64 b b) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a (fma.f64 #s(literal -2 binary64) (*.f64 a (+.f64 (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) b))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (neg.f64 (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 b b)))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (neg.f64 (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* a (* y-scale (+ b (* -1 b)))) (* angle (* (pow b 2) (* x-scale (PI)))))))
(fma.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a (*.f64 y-scale (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 (*.f64 b b) (*.f64 x-scale (PI.f64)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (* a (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))) (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))))))
(fma.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))) (*.f64 a (*.f64 #s(literal 2 binary64) (fma.f64 a (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (*.f64 b b) (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 y-scale (*.f64 angle (*.f64 (*.f64 b b) (*.f64 x-scale (PI.f64))))) (/.f64 (*.f64 y-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (PI.f64))))))) (/.f64 (*.f64 y-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 angle (*.f64 (*.f64 b b) (*.f64 x-scale (PI.f64)))))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))) (* a (+ (* -2 (* a (+ (* -1 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 4) (* x-scale (PI)))))) (/ (* (+ b (* -1 b)) (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))) (pow b 2))))) (* 2 (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))))))))
(fma.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))) (*.f64 a (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 angle (*.f64 (*.f64 b b) (*.f64 x-scale (PI.f64))))) (*.f64 a (fma.f64 #s(literal -2 binary64) (*.f64 a (+.f64 (neg.f64 (/.f64 (*.f64 y-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (PI.f64)))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (*.f64 b b) (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 y-scale (*.f64 angle (*.f64 (*.f64 b b) (*.f64 x-scale (PI.f64))))) (/.f64 (*.f64 y-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (PI.f64)))))))) (*.f64 b b)))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 x-scale (*.f64 angle (*.f64 (*.f64 b b) (*.f64 y-scale (PI.f64))))) (+.f64 (/.f64 y-scale (*.f64 angle (*.f64 (*.f64 b b) (*.f64 x-scale (PI.f64))))) (/.f64 (*.f64 y-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (PI.f64)))))))))))))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale)))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale)))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale)))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow b 2) (sin (* 1/90 (* angle (PI))))))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(- (+ (* a (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI)))))))) (/ (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))))
(-.f64 (fma.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale 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)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))
(- (+ (* a (- (+ (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* a (- (+ (* 1/2 (/ 1 (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))))) (+ (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow b 4) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ 1 (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI)))))))) (pow b 2)))))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI)))))))) (/ (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))))
(-.f64 (fma.f64 a (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 a (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (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/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale 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)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))
(- (+ (* a (- (+ (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* a (- (+ (* 1/2 (/ 1 (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* a (- (* -1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* -1 (/ (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI))))))) (pow b 2))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow b 2) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI)))))))))) (+ (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow b 4) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ 1 (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI)))))))) (pow b 2))))))) (pow b 2)))))))) (+ (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow b 4) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ 1 (* (pow b 2) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (- (* -1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI)))))))) (pow b 2)))))))) (/ (* (+ b (* -1 b)) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (pow b 4) (sin (* 1/90 (* angle (PI)))))))) (/ (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* (pow y-scale 2) (sin (* 1/90 (* angle (PI))))))) (+ (* (/ 1 (* (pow b 2) (sin (* 1/90 (* angle (PI)))))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* (pow x-scale 2) (sin (* 1/90 (* angle (PI))))))))
(-.f64 (fma.f64 a (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 a (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (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/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 b b))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (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/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b))))))) (*.f64 b b))))))) (+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (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/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 b b)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 y-scale y-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale 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)))))) (*.f64 (*.f64 x-scale x-scale) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))
(- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))
(-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))
(- (+ (* -1/2 (* (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))
(-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))
(- (+ (* a (- (* a (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))
(-.f64 (fma.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (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/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))
(- (+ (* a (- (* a (- (+ (* -1/2 (* (* a (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))
(-.f64 (fma.f64 a (fma.f64 a (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (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/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (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/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))
(sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
(sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
(+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))))
(- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale))))
(- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(-.f64 (fma.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale))))
(- (+ (* (pow a 2) (- (+ (* -1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(-.f64 (fma.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale))))
(- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(-.f64 (fma.f64 (*.f64 a a) (-.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (/.f64 (*.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 x-scale))))
(/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow b 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64)))) (*.f64 b b)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(+ (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow b 2))) (* a (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(fma.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 b b)) (*.f64 a (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.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)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(+ (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow b 2))) (* a (- (+ (* a (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(fma.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 b b)) (*.f64 a (-.f64 (fma.f64 a (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 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 2 binary64)))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.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)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (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 (*.f64 b b) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) (+ (* a (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #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)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 a (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (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 (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) (+ (* a (- (+ (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* (+ b (* -1 b)) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #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)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 a (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.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)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (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 (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 (*.f64 #s(literal 0 binary64) b) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (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 (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 b b)))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (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 (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) (+ (* a (- (+ (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* a (- (* 1/2 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow b 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* (+ b (* -1 b)) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))) (pow b 2))))) (/ (sin (* 1/180 (* angle (PI)))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* (+ b (* -1 b)) (- (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #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)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)))))) (fma.f64 a (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.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)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 b b)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 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 2 binary64)))))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (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 (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 b b))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (cos.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)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (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 (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 (*.f64 #s(literal 0 binary64) b) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (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 (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 b b))))) (*.f64 b b)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 b b) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (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 (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 (*.f64 #s(literal 0 binary64) b) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (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 (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 b b)))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (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 (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
(*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))
(+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)))))
(+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))) (* a (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)))))))))
(fma.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64) (*.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) b) #s(literal 0 binary64)))) (*.f64 y-scale y-scale)) (*.f64 a (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))))))
(+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow y-scale 2))) (* a (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))))))))
(fma.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64) (*.f64 a (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) b) #s(literal 0 binary64)))) (*.f64 y-scale y-scale)) (*.f64 a (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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)))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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)))))))
(/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))))
(*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) b))) (*.f64 a (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2)))))
(fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) b))) (*.f64 a (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b)))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (pow a 3))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))))))
(fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) b))) (*.f64 a (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b)))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) b)))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) a)) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b)))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 a a)))))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(*.f64 #s(literal -2 binary64) (+.f64 (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))
(fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (*.f64 a a))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) (pow a 3))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))
(fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 (*.f64 a a) a)) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (*.f64 a a)))))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI))))))
(neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(- (+ (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI)))))) (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* a (sin (* 1/90 (* angle (PI)))))))
(-.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))
(- (+ (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (+ (* -1 (/ (* (+ b (* -1 b)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI))))))) (pow a 2))) (+ (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* a (sin (* 1/90 (* angle (PI)))))) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/90 (* angle (PI)))))))))
(-.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))
(- (+ (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (pow a 2) (sin (* 1/90 (* angle (PI))))))) (+ (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (* 1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* (pow a 3) (sin (* 1/90 (* angle (PI)))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (+ (* -1 (/ (* (+ b (* -1 b)) (- (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (* (+ b (* -1 b)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))))) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))))) (pow a 3))) (+ (* -1 (/ (* (+ b (* -1 b)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI))))))) (pow a 2))) (+ (* -1 (/ (* (pow b 2) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI))))))) (pow a 3))) (+ (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* a (sin (* 1/90 (* angle (PI)))))) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* (pow a 2) (sin (* 1/90 (* angle (PI)))))))))))
(-.f64 (+.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (*.f64 a a) a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 (*.f64 a a) a))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) a))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (*.f64 a (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 a a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))
(* (pow a 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))))
(*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))))
(* (pow a 2) (- (+ (* -1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))))
(*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))))
(* (pow a 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2)))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (pow a 2)) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2)))))))))
(*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)))))))))
(* (pow a 2) (- (+ (* -1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (pow a 3)) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow y-scale 2))))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (pow a 2)) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (pow x-scale 2)))))))))
(*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 a a) a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)))))))))
(* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
(*.f64 (*.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(*.f64 (*.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(*.f64 (*.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(*.f64 (*.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))
(* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))
(* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (*.f64 a a) (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(/ (* (pow a 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2))
(/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow a 2) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) a) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* (pow a 2) (- (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))))
(*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) a) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))
(* (pow a 2) (- (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (+ (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow a 3))) (+ (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (* (pow a 3) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))))
(*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) a) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (*.f64 a a) a)) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (*.f64 (*.f64 a a) a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))
(* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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))))))))
(- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 a (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
(- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (+ (* -1 (/ (* (+ b (* -1 b)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))) (+ (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 a (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 a a))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
(- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1/2 (/ (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow a 3) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (+ (* -1 (/ (* (+ b (* -1 b)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))) (+ (* -1 (/ (* (+ b (* -1 b)) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (* (+ b (* -1 b)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 3))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 3))) (+ (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 a (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (fma.f64 #s(literal -1 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b #s(literal 0 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 a a))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 a a) a))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 a a) a))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 a (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow a 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 a a)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow a 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow a 3) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (*.f64 a a)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) b) #s(literal 0 binary64)))) (*.f64 (*.f64 (*.f64 a a) a) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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)))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ b (* -1 a)) 2) (pow (- b (* -1 a)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ b (* -1 a)) (- b (* -1 a)))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (-.f64 b (neg.f64 a)) (-.f64 b (neg.f64 a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (-.f64 b a) (-.f64 b (neg.f64 a)))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ b (* -1 a)) 2) (pow (- b (* -1 a)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ b (* -1 a)) (- b (* -1 a)))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (-.f64 b (neg.f64 a)) (-.f64 b (neg.f64 a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (-.f64 b a) (-.f64 b (neg.f64 a)))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ b (* -1 a)) 2) (pow (- b (* -1 a)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ b (* -1 a)) (- b (* -1 a)))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (-.f64 b (neg.f64 a)) (-.f64 b (neg.f64 a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (-.f64 b a) (-.f64 b (neg.f64 a)))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ b (* -1 a)) 2) (pow (- b (* -1 a)) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))) (+ (* 1/2 (/ (* (pow a 2) (cos (* 1/90 (* angle (PI))))) (pow y-scale 2))) (+ (* 1/2 (/ (pow a 2) (pow y-scale 2))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2))) (+ (* 1/2 (/ (pow a 2) (pow x-scale 2))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ b (* -1 a)) (- b (* -1 a)))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (-.f64 b (neg.f64 a)) (-.f64 b (neg.f64 a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (-.f64 b a) (-.f64 b (neg.f64 a)))))) (PI.f64)))
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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)))))))
(/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))
(*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(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 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (*.f64 a a)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 b b) (-.f64 (neg.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 b b) (*.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)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale))))))) (*.f64 (cos.f64 (*.f64 #s(literal 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)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* 2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) b))) (*.f64 a (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a))) a)))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) b))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b)))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) a))) a)))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* 2 (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) a))) a))) a)))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) b))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b)))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b)))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 #s(literal 0 binary64) b)))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) a))) a))) a)))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) a))) a)))
(fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) a))) a)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -1 (/ (+ (* 2 (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) a))) a))) a)))
(fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 angle (*.f64 y-scale (PI.f64)))) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64))))) a))) a))) a)))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI))))))
(neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(+ (* -1 (/ (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))) a)) (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI)))))))
(+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) a)) (neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))
(+ (* -1 (/ (- (+ (* -1 (/ (- (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (* (+ b (* -1 b)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))))) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI))))))) a)) (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))) a)) (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI)))))))
(+.f64 (neg.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) a)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) a)) (neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))
(+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* 1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (sin (* 1/90 (* angle (PI))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (sin (* 1/90 (* angle (PI)))))) (+ (* -1 (* (+ b (* -1 b)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))))) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI))))))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))))))) a)) (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (sin (* 1/90 (* angle (PI))))))) (+ (* -1 (* (+ b (* -1 b)) (- (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))))) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI))))))) a)) (* 1/2 (* (/ (* (sin (* 1/90 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (/ (* (+ b (* -1 b)) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2)))))) (sin (* 1/90 (* angle (PI)))))) a)) (* -1 (/ (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (sin (* 1/90 (* angle (PI)))))))
(+.f64 (neg.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (fma.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) a)) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) a)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) a)) (neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))
(* (pow a 2) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))))
(*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))))
(* (pow a 2) (- (+ (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))))
(*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))))
(* (pow a 2) (- (+ (* -1 (/ (- (* -1 (/ (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) a)) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) a)) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))))
(*.f64 (*.f64 a a) (-.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) a)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) a)) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))))
(* (pow a 2) (- (+ (* -1 (/ (- (* -1 (/ (- (+ (* 1/2 (* (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) a) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/2 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) a)) (* 1/2 (* (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) a)) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ 1 (pow x-scale 2))))))
(*.f64 (*.f64 a a) (-.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) a) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) a)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) a)) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))))
(* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
(*.f64 (*.f64 a a) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(*.f64 (*.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(*.f64 (*.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
(* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(*.f64 (*.f64 a a) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))
(* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale 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)) (*.f64 x-scale x-scale)))))
(* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (*.f64 a a) (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(*.f64 (*.f64 a a) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 a #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a a)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 (*.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 x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(/ (* (pow a 2) (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2))
(/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow a 2) (+ (* -4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) a) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* (pow a 2) (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4))) a)) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(*.f64 (*.f64 a a) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) a)) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))))) a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* (pow a 2) (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) a)) (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4))) a)) (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) a)) (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(*.f64 (*.f64 a a) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b #s(literal 0 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) a)) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))))) a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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))))))))
(+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) a)))
(+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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)))))))) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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)))))))) a)))
(+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (* (+ b (* -1 b)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) a))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) a)))
(+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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)))))))) (neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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))))))))) a))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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)))))))) a)))
(+ (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (- (+ (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (- (+ (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (- (* -1/2 (/ (- (* 4 (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow y-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (* (+ b (* -1 b)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* -1 (* (pow b 2) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) a))) (+ (* -1 (* (+ b (* -1 b)) (- (* -2 (/ (* (sin (* 1/180 (* angle (PI)))) (+ (* -2 b) (* 2 b))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) a))) (/ (* (+ b (* -1 b)) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) a)))
(+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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)))))))) (neg.f64 (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (neg.f64 (/.f64 (-.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 b b) b) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b #s(literal 0 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 binary64) (fma.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 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)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 b b) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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)))))))))))) a))) (+.f64 (neg.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b #s(literal 0 binary64))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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))))))))) a))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) b) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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)))))))) a)))
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))
(* (pow a 4) (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (pow y-scale 2)))) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 a (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale)))) a)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 y-scale y-scale)))) a)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))
(* (pow a 4) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* a (pow y-scale 2)))) (+ (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (pow y-scale 2))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow y-scale 2)))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) b) #s(literal 0 binary64)))) (*.f64 a (*.f64 y-scale y-scale))) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.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)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 y-scale y-scale))))) a)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 y-scale y-scale)))) a)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.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 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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)))))))) (*.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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal 1/1511654400000 binary64))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/3856986201600000000 binary64)))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))))) angle)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.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 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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)))))))) (*.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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal 1/1511654400000 binary64))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/3856986201600000000 binary64)))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))))) angle)
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))
(* 1/32400 (* (pow angle 2) (pow (PI) 2)))
(*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64))))
(* (pow angle 2) (- (* -1/3149280000 (* (pow angle 2) (pow (PI) 4))) (* -1/32400 (pow (PI) 2))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64)))))
(* (pow angle 2) (- (* (pow angle 2) (- (* 1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4)))) (* -1/32400 (pow (PI) 2))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/765275040000000 binary64) (*.f64 (*.f64 angle angle) (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) (*.f64 (PI.f64) (PI.f64)))))
(* (pow angle 2) (- (* (pow angle 2) (- (* (pow angle 2) (- (* -1/347128758144000000000 (* (pow angle 2) (pow (PI) 8))) (* -1/765275040000000 (pow (PI) 6)))) (* 1/3149280000 (pow (PI) 4)))) (* -1/32400 (pow (PI) 2))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/347128758144000000000 binary64) (*.f64 (*.f64 angle angle) (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) (*.f64 (PI.f64) (PI.f64)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64)))))
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/3149280000 (* (pow angle 2) (pow (PI) 4))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4)))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.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 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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)))))))) (*.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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal 1/1511654400000 binary64))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/3856986201600000000 binary64)))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))))) angle)
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow a 2) (pow y-scale 2)))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (/ (pow a 2) (pow y-scale 2)))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))))) (/ (pow a 2) (pow y-scale 2)))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 angle (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.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 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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)))))))) (*.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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal 1/1511654400000 binary64))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (fma.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/3856986201600000000 binary64)))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))) (*.f64 (PI.f64) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))))) angle)
(* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 360 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))
(/ (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a))))))) angle)
(/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64)))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))))) (*.f64 #s(literal 360 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle)
(/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64)))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal 1/1511654400000 binary64))))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64)))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle)
(/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 2 binary64) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64)))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 angle angle) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64)) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64)))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal 1/1511654400000 binary64))))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal 1/1511654400000 binary64))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64)))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (fma.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (fma.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/3856986201600000000 binary64)))))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))))) (-.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64)))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal 1/1511654400000 binary64))))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))))))))))) angle)
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64)))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))
(* 1/180 (* angle (PI)))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(*.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))
(*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))
(* 1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2))))
(*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64)))))
(* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))))
(* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))))))))
(* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 a a) (fma.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/347128758144000000000 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))
(* 90 (/ (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 #s(literal 90 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))
(/ (+ (* 90 (/ (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (* (PI) (* (+ a b) (- b a))))) (* (pow angle 2) (- (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a))))))) angle)
(/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/540 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (+.f64 a b) (-.f64 b a))))))) angle)
(/ (+ (* 90 (/ (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (* (PI) (* (+ a b) (- b a))))) (* (pow angle 2) (- (+ (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* (pow angle 2) (- (* 90 (/ (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* -1/48600 (* (pow (PI) 2) (- (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a))))))) (* 1/87480000 (/ (* (pow (PI) 3) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a)))))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a))))))) angle)
(/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (fma.f64 #s(literal -1/48600 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/540 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/87480000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (+.f64 a b) (-.f64 b a))))))))) (*.f64 #s(literal -1/540 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (+.f64 a b) (-.f64 b a))))))) angle)
(/ (+ (* 90 (/ (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))) (* (PI) (* (+ a b) (- b a))))) (* (pow angle 2) (- (+ (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* (pow angle 2) (- (+ (* 90 (/ (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* (pow angle 2) (- (* 90 (/ (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* -1/48600 (* (pow (PI) 2) (- (* 90 (/ (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* -1/48600 (* (pow (PI) 2) (- (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a))))))) (* 1/87480000 (/ (* (pow (PI) 3) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a)))))))) (+ (* -1/29760696000000 (/ (* (pow (PI) 5) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a)))) (* 1/7873200000 (* (pow (PI) 4) (- (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a)))))))))))) (+ (* -1/48600 (* (pow (PI) 2) (- (* 90 (/ (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a))))))) (* 1/87480000 (/ (* (pow (PI) 3) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a)))))))) (* -1/540 (/ (* (PI) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))) (* (+ a b) (- b a))))))) angle)
(/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.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 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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)))))))) (*.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))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (fma.f64 #s(literal -1/48600 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (neg.f64 (fma.f64 #s(literal -1/48600 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/540 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/87480000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (fma.f64 #s(literal -1/29760696000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 #s(literal 1/7873200000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/540 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (+.f64 a b) (-.f64 b a))))))))))))) (fma.f64 #s(literal -1/48600 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 1/540 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/87480000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal -1/540 binary64) (/.f64 (*.f64 (PI.f64) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (+.f64 a b) (-.f64 b a))))))) angle)
(- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
(- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
(- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
(- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.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 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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)))))))) (*.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))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))
(* angle (+ (* -1/4374000 (* (pow angle 2) (pow (PI) 3))) (* 1/90 (PI))))
(*.f64 angle (fma.f64 #s(literal -1/4374000 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 #s(literal 1/90 binary64) (PI.f64))))
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* 1/708588000000 (* (pow angle 2) (pow (PI) 5)))))))
(*.f64 angle (fma.f64 #s(literal 1/90 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/4374000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 #s(literal 1/708588000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/241061637600000000 (* (pow angle 2) (pow (PI) 7))) (* 1/708588000000 (pow (PI) 5))))))))
(*.f64 angle (fma.f64 #s(literal 1/90 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/4374000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/241061637600000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal 1/708588000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))
1
#s(literal 1 binary64)
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/16200 binary64) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64)))))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/1574640000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4)))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/382637520000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))
(- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))
(-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))
(- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.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)))
(- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))
(-.f64 (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.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)))
(- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))
(-.f64 (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.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 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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)))))))) (*.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)))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.f64 (/.f64 (*.f64 b 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)))
(- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
(- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
(- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
(- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))
(-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 angle angle) (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.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 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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)))))))) (*.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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.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 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))))))) (-.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.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)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/64800 binary64) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64)))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/25194240000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/24488801280000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))
(* -2 (pow b 2))
(*.f64 #s(literal -2 binary64) (*.f64 b b))
(+ (* -2 (pow b 2)) (* (pow angle 2) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))
(fma.f64 #s(literal -2 binary64) (*.f64 b b) (*.f64 (*.f64 angle angle) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))
(+ (* -2 (pow b 2)) (* (pow angle 2) (- (+ (* (pow angle 2) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2))) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))
(fma.f64 #s(literal -2 binary64) (*.f64 b b) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 (*.f64 angle angle) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))
(+ (* -2 (pow b 2)) (* (pow angle 2) (- (+ (* (pow angle 2) (- (+ (* (pow angle 2) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2))) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2))) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))
(fma.f64 #s(literal -2 binary64) (*.f64 b b) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 (*.f64 angle angle) (-.f64 (fma.f64 (*.f64 angle angle) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))
(* 180 (/ (+ (* -1 (pow b 2)) (pow b 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 180 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))
(/ (+ (* 180 (/ (+ (* -1 (pow b 2)) (pow b 2)) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (- (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) angle)
(/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))))) angle)
(/ (+ (* 180 (/ (+ (* -1 (pow b 2)) (pow b 2)) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (- (+ (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (- (* 180 (/ (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) angle)
(/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (neg.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal 1/1511654400000 binary64)))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))))) angle)
(/ (+ (* 180 (/ (+ (* -1 (pow b 2)) (pow b 2)) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (- (+ (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (- (+ (* 180 (/ (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (- (* 180 (/ (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (pow a 2))) (+ (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2)))))) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (+ (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))) (pow a 2))) (/ (* (pow y-scale 2) (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2)))))) (pow a 2))))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (pow a 2))))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 32400 (/ (* (+ (* -1 (pow b 2)) (pow b 2)) (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a)))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) angle)
(/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a))))) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (neg.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64))))) (*.f64 a a)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a)))))) (*.f64 a a)))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (neg.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal 1/1511654400000 binary64)))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal 1/1511654400000 binary64))) (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (fma.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (fma.f64 #s(literal -1/1469328076800000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/3856986201600000000 binary64))))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))))))))) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64)) (fma.f64 #s(literal 180 binary64) (/.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))) (*.f64 a a)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))))) (*.f64 a a))))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))))) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (fma.f64 #s(literal 1/22674816000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal 1/1511654400000 binary64)))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))))))) (*.f64 #s(literal 32400 binary64) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))))) angle)
(* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 y-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))))
(+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2)))))))))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64)))))))))
(+ (* -2 (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (pow angle 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow angle 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow b 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow y-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow y-scale 2))))))))))))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) #s(literal -1/787320000 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))))))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))
(/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))
(/.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))
(/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))
(/.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))
(/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))
(/.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))
(/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))
(/.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))
(- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))))
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))))
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))))
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))
(/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))
(/.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))
(/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))
(/.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))
(/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))
(/.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))
(/ (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))
(/.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))
(sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))
(- (+ (/ (* (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))))
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))))
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))))
(+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2))))
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 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 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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) (*.f64 a a)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (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 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (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 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 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 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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) (*.f64 a a)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (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 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (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 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))) x-scale)
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 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 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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) (*.f64 a a)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (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 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (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 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 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 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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) (*.f64 a a)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (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 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (fma.f64 (*.f64 a a) (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 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))) x-scale)
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) x-scale)
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale))
(/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale)
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) y-scale))) x-scale)
(/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale)
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) y-scale))) x-scale)
(/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale)
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) y-scale))) x-scale)
(* -1 (/ (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))
(neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))
(/ (+ (* -1 (/ (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a))))))))) (pow x-scale 2))
(/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (-.f64 b a))))))))) (*.f64 x-scale x-scale))
(/ (+ (* -1 (/ (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a)))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a))))))))) (pow x-scale 2))
(/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (-.f64 b a))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (-.f64 b a))))))))) (*.f64 x-scale x-scale))
(/ (+ (* -1 (/ (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a)))))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3) (- b a)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a))))))))) (pow x-scale 2))
(/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (-.f64 (fma.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (-.f64 b a))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 3 binary64)) (-.f64 b a))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (-.f64 b a))))))))) (*.f64 x-scale x-scale))
(* -1 (/ (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))
(neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale x-scale)))
(/ (- (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 x-scale x-scale) (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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))))))))))) (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)))))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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))))))))))) (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* 2 (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 2 (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 x-scale x-scale) (-.f64 (fma.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64))))))) (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64))))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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))))))))))) (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale x-scale))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (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 x-scale))
(/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (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))))) (fma.f64 (*.f64 a a) (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 x-scale))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (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)))))) (fma.f64 (*.f64 a a) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 x-scale))
(/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (*.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (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))))))) (pow.f64 (fma.f64 (*.f64 a a) (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 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (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))))) (fma.f64 (*.f64 a a) (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 x-scale))
(* -1 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))
(neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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 x-scale)))
(/ (- (* (pow x-scale 2) (- (+ (/ (* (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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 x-scale x-scale) (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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))))))) (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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 x-scale))
(/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (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)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (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)))))) (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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))))))) (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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 x-scale))
(/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (/ (* (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)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/.f64 (fma.f64 (*.f64 x-scale x-scale) (-.f64 (fma.f64 (*.f64 x-scale x-scale) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (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))))))) (pow.f64 (fma.f64 (*.f64 a a) (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 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (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))))) (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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))))))) (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (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 x-scale))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 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 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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) (*.f64 a a)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 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 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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) (*.f64 a a)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) x-scale)
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 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 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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) (*.f64 a a)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 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 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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) (*.f64 a a)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))) x-scale)
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 (*.f64 x-scale x-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 (*.f64 x-scale x-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 (*.f64 x-scale x-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))
(*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) y-scale))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))
(*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) y-scale))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))
(*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) y-scale))))
(* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))
(neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))
(/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a)))))))) (pow x-scale 2))
(/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 b a)))))))) (*.f64 x-scale x-scale))
(/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3) (- b a))))))))) (pow x-scale 2))
(/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 b a)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 b a))))))))) (*.f64 x-scale x-scale))
(/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a))))))) (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3) (- b a))))))) (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a)))))))))) (pow x-scale 2))
(/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 b a)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 b a)))))))))) (*.f64 x-scale x-scale))
(* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale x-scale)))
(/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale x-scale))
(/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale x-scale))
(/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (neg.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 x-scale x-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)))
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (/ (* (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))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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)))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 6) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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))))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))
(* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 x-scale)))
(/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 x-scale))
(/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))
(/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (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 x-scale))
(/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (+ (/ (* (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)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (neg.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (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 x-scale))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 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 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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) (*.f64 a a)))))))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(neg.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))))) x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a)))))))) x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))))))) x-scale))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 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 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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) (*.f64 a a)))))))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(neg.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))))) x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a)))))))) x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))))))) x-scale))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 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 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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) (*.f64 a a)))))))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(neg.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))))) x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a)))))))) x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))))))) x-scale))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 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 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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) (*.f64 a a)))))))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(neg.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))))) x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a)))))))) x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (cos.f64 (*.f64 #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 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 (cos.f64 (*.f64 #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) (*.f64 a a))))))))) x-scale))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 (*.f64 x-scale x-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 (*.f64 x-scale x-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 (*.f64 x-scale x-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2))))))
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a a) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 x-scale x-scale))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2))))))
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a a) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 x-scale x-scale))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2))))))
(neg.f64 (*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 a a) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 x-scale x-scale))))))
(* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))
(neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))
(/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a)))))))) (pow x-scale 2))
(/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 b a)))))))) (*.f64 x-scale x-scale))
(/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a))))))) (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3) (- b a))))))))) (pow x-scale 2))
(/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 b a)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 b a))))))))) (*.f64 x-scale x-scale))
(/ (+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a))))))) (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3) (- b a))))))) (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- b a)))))))))) (pow x-scale 2))
(/.f64 (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 b a)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (-.f64 b a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (-.f64 b a)))))))))) (*.f64 x-scale x-scale))
(* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow x-scale 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale x-scale)))
(/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale x-scale))
(/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow x-scale 2))
(/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 x-scale x-scale))
(/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (neg.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 x-scale x-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)))
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (/ (* (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))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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)))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 6) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (+ (/ (* (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)))))) (+ (/ (* (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))))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))
(* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))
(neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 x-scale)))
(/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 x-scale))
(/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))
(/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (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 x-scale))
(/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (+ (/ (* (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)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (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))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (+ (/ (* (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)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (neg.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (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 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (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 x-scale))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (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 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) y-scale)
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale))
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale)
(/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) x-scale) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) x-scale))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale)
(/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) x-scale) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) x-scale))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale)
(/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) x-scale) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) x-scale))) y-scale)
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))))
(neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))
(+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a)))))))
(+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (-.f64 b a)))))))
(+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a)))))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3) (- b a)))))))))
(+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (-.f64 b a))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 3 binary64)) (-.f64 b a)))))))))
(+ (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (* (pow y-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a)))))) (* (pow y-scale 2) (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3) (- b a)))))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- b a)))))))))))
(+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (-.f64 b a))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 3 binary64)) (-.f64 b a))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (-.f64 b a)))))))))))
(* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(neg.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))
(- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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))))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))
(- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(fma.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64))))))) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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))))))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))
(- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(fma.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64))))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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))))))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))) (*.f64 y-scale y-scale))
(* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(neg.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))
(- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))
(- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(fma.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))
(- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(fma.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 b b) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 b b) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 b b) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale))
(* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2)))))
(*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 b b) x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 y-scale y-scale)))))
(* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2)))))
(*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 b b) x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 y-scale y-scale)))))
(* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2)))))
(*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 b b) x-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 y-scale y-scale)))))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))))
(neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))
(- (+ (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))))
(-.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (-.f64 b a))))))))
(- (+ (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))))
(-.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (-.f64 b a)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (-.f64 b a))))))))
(- (+ (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))) (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3) (- b a))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))))
(-.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (-.f64 b a)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (-.f64 b a)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (-.f64 b a))))))))
(* -1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))
(- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))
(-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))
(- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))
(-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))
(* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))
(- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))
(- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))))))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* 180 (/ (atan (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (PI)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (PI.f64)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))))))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))
(/.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (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 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 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 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a))))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x-scale (-.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (-.f64 (*.f64 b b) (*.f64 a a)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 3 binary64)) (-.f64 (*.f64 b b) (*.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) (-.f64 (*.f64 b b) (*.f64 a a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 (cos.f64 (*.f64 #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) (*.f64 a a)))))))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale)))))
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) x-scale)))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale)))))
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) x-scale)))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale)))))
(neg.f64 (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 y-scale y-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) x-scale)))))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(/ (pow a 2) (pow y-scale 2))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))))
(neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))
(- (+ (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))))
(-.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (-.f64 b a))))))))
(- (+ (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))))
(-.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (-.f64 b a)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (-.f64 b a))))))))
(- (+ (* -1 (/ (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))) (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3) (- b a))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (- b a))))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (* (sin (* 1/90 (* angle (PI)))) (* (+ a b) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- b a))))))))
(-.f64 (+.f64 (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (-.f64 b a)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (-.f64 b a)))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) (-.f64 b a))))))))
(* -1 (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))
(- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))
(- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))
(-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))
(- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))
(-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b 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(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))
(+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))
(* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
(neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))
(- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))))
(- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (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)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (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 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-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)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.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 x-scale)))))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))
(/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a))))))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))
(/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (*.f64 y-scale y-scale))

rewrite361.0ms (0.2%)

Memory
6.9MiB live, 672.1MiB allocated
Rules
5 116×lower-*.f32
5 018×lower-*.f64
3 950×lower-fma.f32
3 936×lower-fma.f64
3 760×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01674752
02984609
111834086
092284056
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
37 → 500
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)) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))
(*.f64 #s(literal 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 #s(literal 1/2 binary64) (*.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 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #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)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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)))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)))))
(sin.f64 (*.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))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))
(/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64)))
Outputs
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.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 -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (sqrt.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 #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (cbrt.f64 (PI.f64))))
(*.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (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 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (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 -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))))) (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 -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) (PI.f64))
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))))))
(/.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 #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))))
(*.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 -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) (/.f64 #s(literal 1 binary64) (neg.f64 (PI.f64))))
(*.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 #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.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)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (/.f64 #s(literal 1 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 #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) #s(literal -1 binary64))
(/.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 -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))))) (neg.f64 (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 #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))))))
(/.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 -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) (neg.f64 (PI.f64)))
(/.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 #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) #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 #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (PI.f64))
(neg.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 -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) (PI.f64)))
(neg.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 -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (neg.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 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) 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 -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))))) (sqrt.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 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))))) (cbrt.f64 (PI.f64))))
(*.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))))))) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-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 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-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 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-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 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-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 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))))))))
(/.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 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))))))))
(*.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (PI.f64))))
(*.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 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))))) (/.f64 #s(literal 1 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 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))))))) (neg.f64 (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 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))))))))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))))))) (neg.f64 (PI.f64)))
(/.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 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))))))) #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 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-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 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))))) (PI.f64))
(neg.f64 (/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))))))) (PI.f64)))
(neg.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))))) (neg.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(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-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)) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))))
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (PI.f64)) #s(literal 1/180 binary64)) angle)
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (PI.f64)) angle) #s(literal 1/180 binary64))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle)
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) angle)) (PI.f64))
(*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) angle)) #s(literal 1/180 binary64))
(*.f64 (*.f64 #s(literal 2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle))
(*.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(/.f64 (*.f64 #s(literal 2 binary64) (PI.f64)) (/.f64 #s(literal 180 binary64) angle))
(*.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (exp.f64 (log.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))
(pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (fma.f64 (*.f64 (PI.f64) #s(literal 1/180 binary64)) angle (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64)))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64)))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))))
(*.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))
(*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))
(pow.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64))
(pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))
(pow.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (cos.f64 (fma.f64 (*.f64 (PI.f64) #s(literal 1/180 binary64)) angle (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 2 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (*.f64 x-scale y-scale))) (sqrt.f64 (PI.f64))))
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (*.f64 x-scale y-scale))) (cbrt.f64 (PI.f64))))
(*.f64 (*.f64 #s(literal 180 binary64) (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (*.f64 x-scale y-scale))) (PI.f64)) #s(literal 180 binary64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (*.f64 x-scale y-scale))) (PI.f64)))
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (*.f64 x-scale y-scale))))) (neg.f64 (PI.f64)))
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (*.f64 x-scale y-scale)))) (PI.f64))
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 #s(literal 180 binary64) (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (*.f64 x-scale y-scale))))))
(/.f64 #s(literal 180 binary64) (/.f64 (PI.f64) (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (*.f64 x-scale y-scale)))))
(*.f64 (exp.f64 (log.f64 b)) (exp.f64 (log.f64 b)))
(*.f64 b b)
(pow.f64 (exp.f64 (log.f64 b)) #s(literal 2 binary64))
(pow.f64 (*.f64 b b) #s(literal 1 binary64))
(pow.f64 b #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64)))
(*.f64 (exp.f64 (log.f64 a)) (exp.f64 (log.f64 a)))
(*.f64 a a)
(pow.f64 (exp.f64 (log.f64 a)) #s(literal 2 binary64))
(pow.f64 (*.f64 a a) #s(literal 1 binary64))
(pow.f64 a #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))
(*.f64 (*.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (/.f64 x-scale (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))) y-scale)
(*.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (+.f64 b a)) (*.f64 (-.f64 b a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))))) (*.f64 x-scale y-scale))))
(*.f64 #s(literal 1 binary64) (*.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))))
(*.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))))
(pow.f64 (/.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))))) (*.f64 (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))))) (fma.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))) (fma.f64 (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))) (*.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (+.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale)))))
(/.f64 (-.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale)))) (*.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(/.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (neg.f64 (+.f64 b a)) (*.f64 (-.f64 b a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))))) (*.f64 x-scale y-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale)))))
(neg.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (neg.f64 (+.f64 b a)) (*.f64 (-.f64 b a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))))) (*.f64 x-scale y-scale))))
(fma.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (neg.f64 (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))))))
(-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale)))) (/.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale)))))
(-.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))))
(+.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))) (neg.f64 (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))))))
(*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y-scale) y-scale)))
(*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(pow.f64 (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))))) (neg.f64 (*.f64 (neg.f64 y-scale) y-scale)))
(/.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b) (*.f64 (*.f64 (neg.f64 a) a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) b) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b) (*.f64 (*.f64 (neg.f64 a) a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 y-scale y-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)))) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (neg.f64 y-scale)) (neg.f64 y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)))) y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)))))
(/.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) (neg.f64 (neg.f64 y-scale)))
(/.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) y-scale)
(/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))
(neg.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 (neg.f64 y-scale) y-scale)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.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 -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (sqrt.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 #s(literal -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (cbrt.f64 (PI.f64))))
(*.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (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) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (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 -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))))) (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 -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) (PI.f64))
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))))))
(/.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 #s(literal -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))))
(*.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 -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) (/.f64 #s(literal 1 binary64) (neg.f64 (PI.f64))))
(*.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 #s(literal -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.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)) (*.f64 (*.f64 #s(literal -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (/.f64 #s(literal 1 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 #s(literal -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) #s(literal -1 binary64))
(/.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 -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))))) (neg.f64 (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 #s(literal -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))))))
(/.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 -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) (neg.f64 (PI.f64)))
(/.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 #s(literal -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) #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 #s(literal -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 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) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (PI.f64))
(neg.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 -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) (PI.f64)))
(neg.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 -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (neg.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) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) 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 -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))
(*.f64 (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))
(*.f64 (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a))) (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)))
(*.f64 (/.f64 y-scale (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a))))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a))) (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a))))
(*.f64 (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) x-scale) (/.f64 y-scale (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (+.f64 b a)) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))
(*.f64 (/.f64 y-scale x-scale) (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (+.f64 b a)) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))
(*.f64 (/.f64 #s(literal 2 binary64) x-scale) (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (+.f64 b a)) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))
(*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a))) (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)))
(*.f64 (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a))))
(*.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))) (neg.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))
(*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))
(*.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))
(pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale) (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale))) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a))))
(/.f64 (neg.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale))) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))) (neg.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale) (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))))))
(/.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))) (neg.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale) (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale) (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))
(neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))
(neg.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))) (neg.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))
(pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1 binary64))
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1 binary64))
(sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) a) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))
(*.f64 (*.f64 (*.f64 a a) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))
(*.f64 (exp.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a))) (exp.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a))))
(*.f64 (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) a)
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) a) a)
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))
(*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))
(*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))))
(pow.f64 (exp.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a))) #s(literal 2 binary64))
(pow.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a) #s(literal 2 binary64))
(pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)) #s(literal 1 binary64))
(fma.f64 #s(literal 1/2 binary64) (*.f64 a a) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64)) (*.f64 a a)))
(fma.f64 (*.f64 a a) #s(literal 1/2 binary64) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 2 binary64) (*.f64 (log.f64 a) #s(literal 2 binary64))))
(exp.f64 (fma.f64 (log.f64 a) #s(literal 2 binary64) (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) a)) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a a)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64)) (*.f64 a a)))
(+.f64 (*.f64 (*.f64 a a) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (/.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) (-.f64 b a)))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) (/.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 (PI.f64) angle)))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 (PI.f64) angle)) (/.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 (-.f64 b a) (+.f64 b a))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (PI.f64)) (/.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) (*.f64 (*.f64 angle (-.f64 b a)) (+.f64 b a))))
(*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (/.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (-.f64 b a)))
(*.f64 (/.f64 (*.f64 x-scale y-scale) (PI.f64)) (/.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 angle (-.f64 b a)) (+.f64 b a))))
(*.f64 (/.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (/.f64 (*.f64 x-scale y-scale) (-.f64 b a)))
(*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (-.f64 b a) (+.f64 b a))) (/.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (PI.f64) angle)))
(*.f64 (/.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (PI.f64) angle)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (-.f64 b a) (+.f64 b a))))
(*.f64 (/.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (PI.f64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 angle (-.f64 b a)) (+.f64 b a))))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (-.f64 b a)))
(*.f64 (/.f64 x-scale (*.f64 (-.f64 b a) (+.f64 b a))) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (PI.f64) angle)))
(*.f64 (/.f64 x-scale (*.f64 (PI.f64) angle)) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a))))
(*.f64 (/.f64 x-scale (PI.f64)) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 angle (-.f64 b a)) (+.f64 b a))))
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (PI.f64) angle)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 b a) (+.f64 b a))))
(*.f64 (/.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) (/.f64 (*.f64 x-scale y-scale) (*.f64 (PI.f64) angle)))
(*.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (PI.f64) angle)) (/.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))))
(*.f64 (*.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (PI.f64) angle)) (*.f64 (-.f64 b a) (+.f64 b a)))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))))
(*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))))
(*.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))))
(pow.f64 (/.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)) (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (PI.f64) angle))) (neg.f64 (*.f64 (-.f64 b a) (+.f64 b a))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))))) (neg.f64 (*.f64 (neg.f64 (*.f64 (PI.f64) angle)) (*.f64 (-.f64 b a) (+.f64 b a)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)) (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (PI.f64) angle)) (*.f64 (-.f64 b a) (+.f64 b a)))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (neg.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 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (PI.f64) angle))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)) (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)) (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))))))
(/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))
(neg.f64 (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))))
(neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (neg.f64 (*.f64 (PI.f64) angle)) (*.f64 (-.f64 b a) (+.f64 b a)))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) #s(literal 2 binary64))
(*.f64 (*.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) x-scale) y-scale)
(*.f64 (*.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) y-scale) x-scale)
(*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))))
(*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)))
(*.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 x-scale y-scale))
(*.f64 x-scale (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))))
(fma.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))) (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 a (/.f64 a (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))) (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 a (/.f64 a (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))))
(*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 a y-scale) (/.f64 a y-scale))
(*.f64 (*.f64 (neg.f64 a) a) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y-scale) y-scale)))
(*.f64 #s(literal 1 binary64) (*.f64 a (/.f64 a (*.f64 y-scale 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 (*.f64 y-scale y-scale) (*.f64 a a)) #s(literal -1 binary64))
(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 (*.f64 (neg.f64 a) a)) (neg.f64 (*.f64 (neg.f64 y-scale) y-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a a))))
(/.f64 (/.f64 (*.f64 a a) y-scale) y-scale)
(/.f64 (*.f64 (neg.f64 a) a) (*.f64 (neg.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 (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 a a)))
(/.f64 (*.f64 a a) (*.f64 y-scale y-scale))
(neg.f64 (/.f64 (*.f64 (neg.f64 a) a) (*.f64 y-scale y-scale)))
(neg.f64 (/.f64 (*.f64 a a) (*.f64 (neg.f64 y-scale) y-scale)))
(*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a))) (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))))
(*.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (+.f64 b a)) (*.f64 (-.f64 b a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))))))
(*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))))
(*.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))))
(pow.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)) (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (/.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))) (*.f64 (/.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (/.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))))) (+.f64 (/.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (/.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) #s(literal 3 binary64)) (pow.f64 (/.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) #s(literal 3 binary64))) (fma.f64 (/.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (/.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (fma.f64 (/.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (/.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (*.f64 (/.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (/.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))))))
(/.f64 (neg.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))) (neg.f64 (*.f64 (neg.f64 (+.f64 b a)) (*.f64 (-.f64 b a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))))
(/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (+.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))))
(/.f64 (-.f64 (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)) #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)) (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))))
(/.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a))) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))))
(/.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))) (*.f64 (neg.f64 (+.f64 b a)) (*.f64 (-.f64 b a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)) (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)) (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))
(neg.f64 (/.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))))
(neg.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (neg.f64 (+.f64 b a)) (*.f64 (-.f64 b a) (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))))))
(fma.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (neg.f64 (/.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))))
(-.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (/.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))))
(-.f64 (/.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (/.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))))
(+.f64 (/.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a))) (neg.f64 (/.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (-.f64 b a)) (+.f64 b a)))))
(*.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(*.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (+.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))) (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (fma.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (+.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (+.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (+.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (+.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)))))) (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))))
(fma.f64 (-.f64 (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)))) (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(fma.f64 (-.f64 (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))) (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y-scale) y-scale)) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y-scale) y-scale)) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y-scale) y-scale)) (neg.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (neg.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) x-scale) x-scale (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) y-scale) x-scale)) (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(fma.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) x-scale (*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) x-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (neg.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(fma.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(fma.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(fma.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (neg.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(-.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (+.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(-.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (+.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))))))) (/.f64 (pow.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (+.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))))))))
(-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))
(-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(+.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(+.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(+.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (neg.f64 (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(+.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (neg.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (hypot.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) (*.f64 x-scale y-scale))) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))))
(*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))
(*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (-.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))
(/.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))))))
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))))
(fma.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))))
(fma.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/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 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))
(*.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(*.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (+.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))) (-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (fma.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (+.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (+.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))) (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (+.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)))))) (-.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (pow.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))))
(fma.f64 (-.f64 (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)))) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))
(fma.f64 (-.f64 (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y-scale) y-scale)) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y-scale) y-scale)) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y-scale) y-scale)) (neg.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (neg.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) x-scale) x-scale (*.f64 (*.f64 (neg.f64 y-scale) y-scale) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) y-scale) x-scale)) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))
(fma.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) x-scale (*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) x-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (neg.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(fma.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))
(fma.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(fma.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (neg.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(-.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))) (/.f64 (pow.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(-.f64 (/.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)) (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (+.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))))))) (/.f64 (pow.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (+.f64 (pow.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (+.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))))))))
(-.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))
(-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))
(+.f64 (-.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale))) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))
(+.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)))))
(+.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 x-scale) x-scale)) (neg.f64 #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(+.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (neg.f64 (+.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 x-scale x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale))))))
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1/2 binary64)))
(pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 1 binary64))
(cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal 1 binary64)))
(*.f64 (neg.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))))))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))))
(*.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))))
(pow.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))) (neg.f64 (neg.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) #s(literal -2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (fma.f64 #s(literal -8 binary64) (pow.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (*.f64 #s(literal 64 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))))))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))))
(/.f64 (neg.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))) (neg.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))))
(/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))))
(neg.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (neg.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))))))
(*.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a))))
(*.f64 (neg.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))) (neg.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))
(*.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))
(pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale) (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale))) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))))) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))) (neg.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (-.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale) (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))))))
(/.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)))
(/.f64 (neg.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))) (neg.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale) (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale) (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))
(neg.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))) (neg.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) #s(literal -2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))))
(*.f64 (fma.f64 #s(literal -8 binary64) (pow.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (*.f64 #s(literal 64 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))))))
(/.f64 (fma.f64 #s(literal 64 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (*.f64 #s(literal -8 binary64) (pow.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))) (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) #s(literal -2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))))
(/.f64 (neg.f64 (fma.f64 #s(literal -8 binary64) (pow.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (*.f64 #s(literal 64 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) #s(literal 3 binary64))))) (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (fma.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) #s(literal -2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))))
(/.f64 (fma.f64 #s(literal -8 binary64) (pow.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (*.f64 #s(literal 64 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (+.f64 (pow.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) #s(literal -2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (pow.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))))))) (fma.f64 #s(literal -8 binary64) (pow.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (*.f64 #s(literal 64 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) #s(literal 3 binary64))))))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) y-scale)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) y-scale) (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(fma.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) #s(literal -2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))
(fma.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) #s(literal -2 binary64) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))
(fma.f64 (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) #s(literal -2 binary64) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) (*.f64 b b) (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 b b)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) b) (*.f64 b (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) #s(literal -2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) #s(literal -2 binary64) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) y-scale) (/.f64 #s(literal 4 binary64) y-scale) (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) #s(literal -2 binary64) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) #s(literal 4 binary64) (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))))
(fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))
(fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))
(fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) #s(literal -2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) #s(literal -2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))))
(+.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) #s(literal -2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) #s(literal -2 binary64)))
(+.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))))
(+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) #s(literal -2 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) #s(literal -2 binary64) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))
(+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))))
(+.f64 (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))))
(+.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))))

eval1.3s (0.8%)

Memory
-104.8MiB live, 1 731.3MiB allocated
Compiler

Compiled 751 963 to 14 320 computations (98.1% saved)

prune27.4s (18.3%)

Memory
108.2MiB live, 53 443.8MiB allocated
Pruning

52 alts after pruning (52 fresh and 0 done)

PrunedKeptTotal
New3 022503 072
Fresh17219
Picked505
Done000
Total3 044523 096
Accuracy
85.2%
Counts
3 096 → 52
Alt Table
Click to see full alt table
StatusAccuracyProgram
27.8%
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) (PI.f64))
3.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 -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) (/.f64 #s(literal 1 binary64) (PI.f64)))
12.2%
(*.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 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale 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))) (PI.f64)))
12.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 y-scale x-scale))) (PI.f64)))
22.3%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale 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 x-scale))) (PI.f64)))
11.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 y-scale x-scale))) (PI.f64)))
22.6%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 y-scale x-scale))) (PI.f64)))
19.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 y-scale x-scale))) (PI.f64)))
15.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 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (PI.f64) angle)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
15.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 (*.f64 (*.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) y-scale) x-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
26.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 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64)))) (PI.f64)))
29.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 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal -1/2 binary64)))) (PI.f64)))
▶30.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 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)))
27.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 #s(approx (sin (* (* (PI) angle) 1/180)) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)))
29.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 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) #s(approx (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64)))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)))
30.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 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)))
30.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 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)))
15.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) y-scale))) x-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
▶9.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(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
15.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
2.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(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
28.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
26.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 (*.f64 (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal -1/2 binary64)))) (PI.f64)))
29.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 (*.f64 (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)))) #s(literal -1/2 binary64)))) (PI.f64)))
22.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 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (/.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) (-.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
22.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (-.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
30.5%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)))) #s(literal -1/2 binary64)))) (PI.f64)))
14.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))) #s(literal 90 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 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) #s(approx (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64)))))))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)))
7.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 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)))
13.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 #s(approx (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (*.f64 #s(literal -2 binary64) (*.f64 b b))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)))
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 (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (-.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))) #s(literal -1/2 binary64)))) (PI.f64)))
14.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
13.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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(literal -1/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 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (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 (*.f64 b b) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) #s(literal -1/2 binary64)))) (PI.f64)))
11.1%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.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 3 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) #s(literal -1/2 binary64)))) (PI.f64)))
14.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))) #s(literal -1/2 binary64)))) (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 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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(literal -1/2 binary64)))) (PI.f64)))
14.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64))))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))) (*.f64 b b)))))) #s(literal 90 binary64)))) (PI.f64)))
▶5.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64)))) (PI.f64)))
6.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) a))) a)))) #s(literal 90 binary64)))) (PI.f64)))
4.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (*.f64 a a))))) #s(literal 90 binary64)))) (PI.f64)))
11.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) y-scale)) #s(literal 90 binary64)))) (PI.f64)))
12.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 b b) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) #s(literal 90 binary64)))) (PI.f64)))
2.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) #s(literal 90 binary64)))) (PI.f64)))
28.6%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) #s(literal 90 binary64)))) (PI.f64)))
38.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)))
▶14.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)))
15.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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64)))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))))) (*.f64 #s(literal 360 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) angle)) #s(literal -1/2 binary64)))) (PI.f64)))
45.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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
▶48.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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
27.8%
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (/.f64 #s(literal 1 binary64) (PI.f64))))
Compiler

Compiled 8 208 to 3 652 computations (55.5% saved)

simplify232.0ms (0.2%)

Memory
3.2MiB live, 202.5MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))))
cost-diff0
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))
cost-diff0
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)))
cost-diff512
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))
cost-diff320
(*.f64 x-scale (*.f64 #s(literal 0 binary64) a))
cost-diff384
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))
cost-diff1984
(/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64)))))
cost-diff8128
(/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))
cost-diff0
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))
cost-diff0
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))))
cost-diff0
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))
cost-diff0
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
cost-diff0
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))
cost-diff0
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))))
cost-diff0
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))
cost-diff0
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)))
cost-diff0
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))
cost-diff0
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))))
cost-diff0
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))
cost-diff0
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
Rules
8 248×lower-*.f32
8 164×lower-*.f64
2 482×lower-/.f32
2 456×lower-/.f64
2 196×lower-fma.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01716398
02636363
15615981
219005923
372745918
081605818
Stop Event
1×iter limit
1×node limit
1×iter limit
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)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))
(*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))
#s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(literal -2 binary64)
(/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
y-scale
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
x-scale
(cos.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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))
(*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))))
(*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))
#s(literal -2 binary64)
(/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))
x-scale
(*.f64 angle (*.f64 y-scale (PI.f64)))
angle
(*.f64 y-scale (PI.f64))
y-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(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale 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 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b 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 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #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)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))
(*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))
(/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))
#s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))
(*.f64 a a)
a
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))
#s(literal -2 binary64)
(/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale))
(*.f64 (*.f64 b b) y-scale)
(*.f64 b b)
b
y-scale
(*.f64 (*.f64 a a) x-scale)
x-scale
(*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))
#s(literal 2 binary64)
(/.f64 x-scale y-scale)
(*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (PI.f64) angle)
(PI.f64)
angle
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
(-.f64 b a)
#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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64)))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64)))
(*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))))))
(fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))
#s(literal -2 binary64)
(/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))
x-scale
(*.f64 angle (*.f64 y-scale (PI.f64)))
angle
(*.f64 y-scale (PI.f64))
y-scale
(PI.f64)
(*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))))
b
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))
(/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64)))))
(*.f64 x-scale (*.f64 #s(literal 0 binary64) a))
(*.f64 #s(literal 0 binary64) a)
#s(literal 0 binary64)
a
(*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))
(*.f64 a a)
(*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))
#s(literal 2 binary64)
(*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))
(-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))
(/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64)))))
(*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))
(*.f64 angle (*.f64 x-scale (PI.f64)))
(*.f64 x-scale (PI.f64))
(+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))
(/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64)))))
(/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))
(*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a)))
(*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))
(pow.f64 a #s(literal 4 binary64))
#s(literal 4 binary64)
#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 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale)
(*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))
#s(literal 2 binary64)
(fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))
(*.f64 b b)
b
(pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 (PI.f64) angle)
(PI.f64)
angle
#s(literal 1/180 binary64)
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))
(*.f64 a a)
a
(pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
y-scale
(*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)))
x-scale
#s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
(-.f64 b a)
#s(literal -1/2 binary64)
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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) y-scale) (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 180 binary64) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) y-scale) (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)))))) (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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) y-scale) (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(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) y-scale) (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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) y-scale) (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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) y-scale) (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 -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(/.f64 (*.f64 (*.f64 #s(literal -2 binary64) y-scale) (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)
(/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(*.f64 (/.f64 (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 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) y-scale)
y-scale
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
(*.f64 (PI.f64) angle)
angle
(PI.f64)
(*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)
x-scale
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (/.f64 #s(literal 180 binary64) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-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)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-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)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))
(*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))
(*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))))
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))
#s(literal -2 binary64)
(/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
x-scale
(*.f64 angle (*.f64 y-scale (PI.f64)))
(*.f64 (*.f64 (PI.f64) y-scale) angle)
angle
(*.f64 y-scale (PI.f64))
(*.f64 (PI.f64) y-scale)
y-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(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (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) (*.f64 (*.f64 (-.f64 b a) (PI.f64)) (*.f64 (+.f64 b a) angle))) #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) #s(literal -2 binary64)) (*.f64 b b) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a)))))) (/.f64 #s(literal 180 binary64) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (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) (*.f64 (*.f64 (-.f64 b a) (PI.f64)) (*.f64 (+.f64 b a) angle))) #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) #s(literal -2 binary64)) (*.f64 b b) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a)))))) (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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale 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(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (PI.f64)) (*.f64 (+.f64 b a) angle))) #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) #s(literal -2 binary64)) (*.f64 b b) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.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 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #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)) (*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (PI.f64)) (*.f64 (+.f64 b a) angle))) #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) #s(literal -2 binary64)) (*.f64 b b) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a)))))
(*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))
(*.f64 (/.f64 #s(literal 90 binary64) (*.f64 (*.f64 (-.f64 b a) (PI.f64)) (*.f64 (+.f64 b a) angle))) #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) #s(literal -2 binary64)) (*.f64 b b) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))))
(/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))
(/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) #s(literal -2 binary64)) (*.f64 b b) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (PI.f64)) (*.f64 (+.f64 b a) angle)))
#s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))))
#s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) #s(literal -2 binary64)) (*.f64 b b) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a)))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))
(*.f64 (fma.f64 (*.f64 (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) #s(literal -2 binary64)) (*.f64 b b) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))
(*.f64 a a)
a
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))
(fma.f64 (*.f64 (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) #s(literal -2 binary64)) (*.f64 b b) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)))
#s(literal -2 binary64)
(/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale))
(*.f64 (*.f64 (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) b) b)
(*.f64 (*.f64 b b) y-scale)
(*.f64 b b)
b
y-scale
(*.f64 (*.f64 a a) x-scale)
x-scale
(*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))
(*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 x-scale y-scale)
(*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (*.f64 (-.f64 b a) (PI.f64)) (*.f64 (+.f64 b a) angle))
(*.f64 (PI.f64) angle)
(PI.f64)
angle
(*.f64 (+.f64 b a) (-.f64 b a))
(*.f64 (-.f64 b a) (+.f64 b a))
(+.f64 b a)
(-.f64 b a)
#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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 (*.f64 (*.f64 b #s(literal 2 binary64)) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a (PI.f64)) x-scale) (*.f64 angle a))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a y-scale) (PI.f64)) (*.f64 angle a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))) #s(literal 90 binary64)))) (/.f64 #s(literal 180 binary64) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64)))) (PI.f64))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 (*.f64 (*.f64 b #s(literal 2 binary64)) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a (PI.f64)) x-scale) (*.f64 angle a))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a y-scale) (PI.f64)) (*.f64 angle a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))) #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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 (*.f64 (*.f64 b #s(literal 2 binary64)) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a (PI.f64)) x-scale) (*.f64 angle a))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a y-scale) (PI.f64)) (*.f64 angle a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))) #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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 (*.f64 (*.f64 b #s(literal 2 binary64)) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a (PI.f64)) x-scale) (*.f64 angle a))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a y-scale) (PI.f64)) (*.f64 angle a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))) #s(literal 90 binary64)))
(*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))
(*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 (*.f64 (*.f64 b #s(literal 2 binary64)) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a (PI.f64)) x-scale) (*.f64 angle a))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a y-scale) (PI.f64)) (*.f64 angle a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))) #s(literal 90 binary64))
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))))))
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 (*.f64 (*.f64 b #s(literal 2 binary64)) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a (PI.f64)) x-scale) (*.f64 angle a))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a y-scale) (PI.f64)) (*.f64 angle a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))
(fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))
(fma.f64 (*.f64 (*.f64 b #s(literal 2 binary64)) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a (PI.f64)) x-scale) (*.f64 angle a))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a y-scale) (PI.f64)) (*.f64 angle a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
#s(literal -2 binary64)
(/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
x-scale
(*.f64 angle (*.f64 y-scale (PI.f64)))
(*.f64 (*.f64 (PI.f64) y-scale) angle)
angle
(*.f64 y-scale (PI.f64))
(*.f64 (PI.f64) y-scale)
y-scale
(PI.f64)
(*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))))
(*.f64 (*.f64 (*.f64 b #s(literal 2 binary64)) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a (PI.f64)) x-scale) (*.f64 angle a))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a y-scale) (PI.f64)) (*.f64 angle a)))))
b
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))
(*.f64 (*.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a (PI.f64)) x-scale) (*.f64 angle a))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a y-scale) (PI.f64)) (*.f64 angle a)))))
(/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64)))))
#s(literal 0 binary64)
(*.f64 x-scale (*.f64 #s(literal 0 binary64) a))
#s(literal 0 binary64)
(*.f64 #s(literal 0 binary64) a)
#s(literal 0 binary64)
#s(literal 0 binary64)
a
(*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))
(*.f64 (*.f64 (*.f64 a y-scale) (PI.f64)) (*.f64 angle a))
(*.f64 a a)
(*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))
(*.f64 (*.f64 b #s(literal 2 binary64)) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a (PI.f64)) x-scale) (*.f64 angle a))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a y-scale) (PI.f64)) (*.f64 angle a)))))
#s(literal 2 binary64)
(*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))
(*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a (PI.f64)) x-scale) (*.f64 angle a))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a y-scale) (PI.f64)) (*.f64 angle a)))) b)
(-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))
(-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a (PI.f64)) x-scale) (*.f64 angle a))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a y-scale) (PI.f64)) (*.f64 angle a))))
(/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64)))))
(/.f64 y-scale (*.f64 (*.f64 (*.f64 a (PI.f64)) x-scale) (*.f64 angle a)))
(*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))
(*.f64 (*.f64 (*.f64 a (PI.f64)) x-scale) (*.f64 angle a))
(*.f64 angle (*.f64 x-scale (PI.f64)))
(*.f64 (*.f64 (PI.f64) x-scale) angle)
(*.f64 x-scale (PI.f64))
(*.f64 (PI.f64) x-scale)
(+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))
(/.f64 x-scale (*.f64 (*.f64 (*.f64 a y-scale) (PI.f64)) (*.f64 angle a)))
(/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64)))))
(/.f64 x-scale (*.f64 (*.f64 (*.f64 a y-scale) (PI.f64)) (*.f64 angle a)))
(/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))
#s(literal 0 binary64)
(*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a)))
#s(literal 0 binary64)
(*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))
#s(literal 0 binary64)
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))
(*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) (*.f64 (PI.f64) angle))
(pow.f64 a #s(literal 4 binary64))
#s(literal 4 binary64)
#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 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))))) (/.f64 #s(literal 180 binary64) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) 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)) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 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 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (*.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))))
(*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale)
(*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))))
(*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))
(*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))
#s(literal 2 binary64)
(fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))
(*.f64 b b)
b
(pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 (PI.f64) angle)
(PI.f64)
angle
#s(literal 1/180 binary64)
(*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))
(*.f64 a a)
a
(pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
y-scale
(*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.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))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))
(*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)))
(*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)
x-scale
#s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 (*.f64 (+.f64 b a) (-.f64 b 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 a) (+.f64 b a)))
(*.f64 (+.f64 b a) (-.f64 b a))
(*.f64 (-.f64 b a) (+.f64 b a))
(+.f64 b a)
(-.f64 b a)
#s(literal -1/2 binary64)

localize1.5s (1%)

Memory
19.0MiB live, 2 297.6MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy19.233132198223522
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
accuracy19.503406488205904
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
accuracy20.33642838732166
#s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))
accuracy29.38387529476738
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
accuracy17.718650925898622
(/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64)))))
accuracy24.117052649139794
(/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))
accuracy30.50339478452594
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))))))
accuracy44.656231019891365
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64)))
accuracy16.096776483841648
(/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale))
accuracy19.860494708203177
(*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))
accuracy27.1301120849498
(/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))
accuracy44.656231019891365
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))
accuracy0.23046875
(*.f64 y-scale (PI.f64))
accuracy5.127683699621976
(/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))
accuracy36.223321704095746
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))))
accuracy44.656231019891365
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))
accuracy8.665851001494705
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))
accuracy19.233132198223522
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy19.503406488205904
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy37.58503105610448
#s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
Samples
375.0ms121×1valid
254.0ms47×2valid
133.0ms83×0valid
22.0ms5×3valid
Compiler

Compiled 4 726 to 128 computations (97.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 671.0ms
ival-mult: 214.0ms (31.9% of total)
ival-cos: 105.0ms (15.7% of total)
ival-sin: 83.0ms (12.4% of total)
ival-div: 80.0ms (11.9% of total)
ival-pow2: 44.0ms (6.6% of total)
ival-add: 37.0ms (5.5% of total)
ival-pi: 37.0ms (5.5% of total)
adjust: 36.0ms (5.4% of total)
ival-sub: 14.0ms (2.1% of total)
const: 8.0ms (1.2% of total)
ival-sqrt: 4.0ms (0.6% of total)
ival-atan: 3.0ms (0.4% of total)
ival-pow: 3.0ms (0.4% of total)
exact: 1.0ms (0.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series757.0ms (0.5%)

Memory
40.5MiB live, 1 857.4MiB allocated
Counts
35 → 1 704
Calls
Call 1
Inputs
#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())
#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())
#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())
#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())
#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())
#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())
#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())
#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())
#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())
#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())
#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())
#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())
#s(alt (*.f64 y-scale (PI.f64)) (patch (*.f64 y-scale (PI.f64)) #<representation binary64>) () ())
#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())
#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())
#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())
Outputs
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (taylor 0 b) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (taylor 0 b) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (taylor 0 b) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (taylor 0 b) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* b (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* b (+ (* -1 (* b (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* b (+ (* b (+ (* -1 (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* b (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (* b (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* 2 (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI))))))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ x-scale (* angle (* y-scale (PI))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* b (* x-scale (+ a (* -1 a)))) (* (pow a 2) (* angle (* y-scale (PI))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))) (pow a 2))) (/ (* x-scale (+ a (* -1 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))) (* 2 (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI))))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ x-scale (* angle (* y-scale (PI))))) (taylor 0 b) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* b (* x-scale (+ a (* -1 a)))) (* (pow a 2) (* angle (* y-scale (PI))))))) (taylor 0 b) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))))))) (taylor 0 b) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))) (pow a 2))) (/ (* x-scale (+ a (* -1 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))) (* 2 (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI))))))))))))) (taylor 0 b) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) y-scale)) (taylor 0 b) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ x-scale (* angle (* y-scale (PI))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* b (* x-scale (+ a (* -1 a)))) (* (pow a 2) (* angle (* y-scale (PI))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))) (pow a 2))) (/ (* x-scale (+ a (* -1 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))) (* 2 (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI))))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* b (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (* b (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* 2 (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI))))))))))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (taylor inf b) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (taylor inf b) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (taylor inf b) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (taylor inf b) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (taylor inf b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor inf b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI))))))))) (taylor inf b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 3)) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (taylor inf b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (taylor inf b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor inf b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))) (taylor inf b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (taylor inf b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ y-scale (* angle (* x-scale (PI))))) (taylor inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI))))))) (taylor inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))) (taylor inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* -2 (/ (+ (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI))))) (* (+ a (* -1 a)) (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))) (taylor inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ y-scale (* angle (* x-scale (PI))))) (taylor inf b) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI))))))) (taylor inf b) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))) (taylor inf b) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* -2 (/ (+ (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI))))) (* (+ a (* -1 a)) (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))) (taylor inf b) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) x-scale)) (taylor inf b) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale))))) (taylor inf b) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale))))) (taylor inf b) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale))))) (taylor inf b) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ y-scale (* angle (* x-scale (PI))))) (taylor inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI))))))) (taylor inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))) (taylor inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* -2 (/ (+ (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI))))) (* (+ a (* -1 a)) (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))) (taylor inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (taylor -inf b) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (taylor -inf b) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (taylor -inf b) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (taylor -inf b) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) b))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) b)) (+ (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* b (* x-scale (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) b))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (taylor -inf b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor -inf b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor -inf b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) b))) b)) (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor -inf b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ y-scale (* angle (* x-scale (PI))))) (taylor -inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI))))))) (taylor -inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) b))) b))) (taylor -inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI)))))) b))) b))) b))) (taylor -inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ y-scale (* angle (* x-scale (PI))))) (taylor -inf b) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI))))))) (taylor -inf b) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) b))) b))) (taylor -inf b) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI)))))) b))) b))) b))) (taylor -inf b) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) x-scale)) (taylor -inf b) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ y-scale (* angle (* x-scale (PI))))) (taylor -inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI))))))) (taylor -inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) b))) b))) (taylor -inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI)))))) b))) b))) b))) (taylor -inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) b))) b)) (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2))) (taylor 0 a) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2))) (taylor 0 a) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2))) (taylor 0 a) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2))) (taylor 0 a) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 a) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 a) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 a) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 a) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* a (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -1 (* a (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* a (+ (* -1 (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (* a (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (pow b 2)))))) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* a (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (* a (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -2 (* a (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (pow b 2))))) (* 2 (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ y-scale (* angle (* x-scale (PI))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* a (* y-scale (+ b (* -1 b)))) (* angle (* (pow b 2) (* x-scale (PI))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (* a (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))) (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI))))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))) (* a (+ (* -2 (* a (+ (* -1 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 4) (* x-scale (PI)))))) (/ (* (+ b (* -1 b)) (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))) (pow b 2))))) (* 2 (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ y-scale (* angle (* x-scale (PI))))) (taylor 0 a) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* a (* y-scale (+ b (* -1 b)))) (* angle (* (pow b 2) (* x-scale (PI))))))) (taylor 0 a) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (* a (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))) (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI))))))))) (taylor 0 a) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))) (* a (+ (* -2 (* a (+ (* -1 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 4) (* x-scale (PI)))))) (/ (* (+ b (* -1 b)) (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))) (pow b 2))))) (* 2 (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))))))) (taylor 0 a) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) x-scale)) (taylor 0 a) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale))) (taylor 0 a) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale))) (taylor 0 a) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale))) (taylor 0 a) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ y-scale (* angle (* x-scale (PI))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* a (* y-scale (+ b (* -1 b)))) (* angle (* (pow b 2) (* x-scale (PI))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (* a (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))) (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI))))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))) (* a (+ (* -2 (* a (+ (* -1 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 4) (* x-scale (PI)))))) (/ (* (+ b (* -1 b)) (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))) (pow b 2))))) (* 2 (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* a (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (* a (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -2 (* a (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (pow b 2))))) (* 2 (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2))) (taylor inf a) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2))) (taylor inf a) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2))) (taylor inf a) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2))) (taylor inf a) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf a) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf a) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf a) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf a) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (taylor inf a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (taylor inf a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))))) (taylor inf a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 3))) (+ (* -1 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI))))))))))) (taylor inf a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor inf a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))))) (taylor inf a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))))) (taylor inf a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (pow a 3))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (taylor inf a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ x-scale (* angle (* y-scale (PI))))) (taylor inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI))))))) (taylor inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))) (taylor inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) (pow a 3))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))) (taylor inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ x-scale (* angle (* y-scale (PI))))) (taylor inf a) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI))))))) (taylor inf a) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))) (taylor inf a) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) (pow a 3))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))) (taylor inf a) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) y-scale)) (taylor inf a) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale)))) (taylor inf a) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale)))) (taylor inf a) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale)))) (taylor inf a) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ x-scale (* angle (* y-scale (PI))))) (taylor inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI))))))) (taylor inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))) (taylor inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) (pow a 3))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))) (taylor inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (pow a 3))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf a) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2))) (taylor -inf a) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2))) (taylor -inf a) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2))) (taylor -inf a) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2))) (taylor -inf a) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf a) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf a) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf a) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf a) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (+ (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* a (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))))) a)) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* -1 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) a))) a)) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) a)) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* 2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))))) (taylor -inf a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a))) a))) (taylor -inf a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* 2 (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) a))) a))) a))) (taylor -inf a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ x-scale (* angle (* y-scale (PI))))) (taylor -inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI))))))) (taylor -inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) a))) a))) (taylor -inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -1 (/ (+ (* 2 (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) a))) a))) a))) (taylor -inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ x-scale (* angle (* y-scale (PI))))) (taylor -inf a) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI))))))) (taylor -inf a) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) a))) a))) (taylor -inf a) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -1 (/ (+ (* 2 (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) a))) a))) a))) (taylor -inf a) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) y-scale)) (taylor -inf a) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ x-scale (* angle (* y-scale (PI))))) (taylor -inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI))))))) (taylor -inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) a))) a))) (taylor -inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -1 (/ (+ (* 2 (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) a))) a))) a))) (taylor -inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* 2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a))) a))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* 2 (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) a))) a))) a))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle)) (taylor 0 angle) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle)) (taylor 0 angle) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle)) (taylor 0 angle) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle)) (taylor 0 angle) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -180 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* -1 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) angle) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* -1 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* -1 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* -1 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/180 (* angle (PI))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 angle) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 angle) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 angle) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 angle) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a))))))) angle) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/180 (* angle (PI))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle)) (taylor inf angle) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle)) (taylor inf angle) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle)) (taylor inf angle) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle)) (taylor inf angle) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf angle) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf angle) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf angle) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf angle) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf angle) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* b (- (* -1 (/ y-scale (* (pow a 2) (* x-scale (PI))))) (* -1 (/ x-scale (* (pow a 2) (* y-scale (PI))))))) angle)) (taylor -inf angle) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* b (- (* -1 (/ y-scale (* (pow a 2) (* x-scale (PI))))) (* -1 (/ x-scale (* (pow a 2) (* y-scale (PI))))))) angle)) (taylor -inf angle) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* b (- (* -1 (/ y-scale (* (pow a 2) (* x-scale (PI))))) (* -1 (/ x-scale (* (pow a 2) (* y-scale (PI))))))) angle)) (taylor -inf angle) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* b (- (* -1 (/ y-scale (* (pow a 2) (* x-scale (PI))))) (* -1 (/ x-scale (* (pow a 2) (* y-scale (PI))))))) angle)) (taylor -inf angle) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf angle) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf angle) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf angle) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf angle) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (* x-scale (PI)))))) (taylor 0 x-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* b (pow x-scale 2)) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (PI)))))) x-scale) (taylor 0 x-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* b (pow x-scale 2)) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (PI)))))) x-scale) (taylor 0 x-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* b (pow x-scale 2)) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (PI)))))) x-scale) (taylor 0 x-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 x-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 x-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 x-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 x-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale) (taylor 0 x-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale) (taylor 0 x-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale) (taylor 0 x-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) x-scale)) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (* y-scale (PI)))))) (taylor inf x-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ b (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI)))))))) (taylor inf x-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ b (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI)))))))) (taylor inf x-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ b (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI)))))))) (taylor inf x-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf x-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf x-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf x-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf x-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))))) (taylor inf x-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))))) (taylor inf x-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))))) (taylor inf x-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) y-scale)) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (* y-scale (PI)))))) (taylor -inf x-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (* b y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI)))))) (* 2 (/ b (* (pow a 2) (* angle (* y-scale (PI))))))))) (taylor -inf x-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (* b y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI)))))) (* 2 (/ b (* (pow a 2) (* angle (* y-scale (PI))))))))) (taylor -inf x-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (* b y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI)))))) (* 2 (/ b (* (pow a 2) (* angle (* y-scale (PI))))))))) (taylor -inf x-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (patch (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf x-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf x-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf x-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf x-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf x-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf x-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf x-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) y-scale)) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2)))))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2)))))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2)))))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (* y-scale (PI)))))) (taylor 0 y-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (PI))))) (* 2 (/ (* b (pow y-scale 2)) (* (pow a 2) (* angle (* x-scale (PI))))))) y-scale) (taylor 0 y-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (PI))))) (* 2 (/ (* b (pow y-scale 2)) (* (pow a 2) (* angle (* x-scale (PI))))))) y-scale) (taylor 0 y-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (PI))))) (* 2 (/ (* b (pow y-scale 2)) (* (pow a 2) (* angle (* x-scale (PI))))))) y-scale) (taylor 0 y-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 y-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 y-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 y-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 y-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (PI)) (taylor 0 y-scale) (#s(alt (*.f64 y-scale (PI.f64)) (patch (*.f64 y-scale (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (PI)) (taylor 0 y-scale) (#s(alt (*.f64 y-scale (PI.f64)) (patch (*.f64 y-scale (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (PI)) (taylor 0 y-scale) (#s(alt (*.f64 y-scale (PI.f64)) (patch (*.f64 y-scale (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (PI)) (taylor 0 y-scale) (#s(alt (*.f64 y-scale (PI.f64)) (patch (*.f64 y-scale (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale) (taylor 0 y-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale) (taylor 0 y-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale) (taylor 0 y-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) y-scale)) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor inf y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (* x-scale (PI)))))) (taylor inf y-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))) (* 2 (/ b (* (pow a 2) (* angle (* x-scale (PI)))))))) (taylor inf y-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))) (* 2 (/ b (* (pow a 2) (* angle (* x-scale (PI)))))))) (taylor inf y-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))) (* 2 (/ b (* (pow a 2) (* angle (* x-scale (PI)))))))) (taylor inf y-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf y-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf y-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf y-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf y-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (PI)) (taylor inf y-scale) (#s(alt (*.f64 y-scale (PI.f64)) (patch (*.f64 y-scale (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (PI)) (taylor inf y-scale) (#s(alt (*.f64 y-scale (PI.f64)) (patch (*.f64 y-scale (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (PI)) (taylor inf y-scale) (#s(alt (*.f64 y-scale (PI.f64)) (patch (*.f64 y-scale (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (PI)) (taylor inf y-scale) (#s(alt (*.f64 y-scale (PI.f64)) (patch (*.f64 y-scale (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))))) (taylor inf y-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))))) (taylor inf y-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))))) (taylor inf y-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) x-scale)) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2))))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2))))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2))))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt 0 (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (patch (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (* x-scale (PI)))))) (taylor -inf y-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ b (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ (* b x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI))))))))) (taylor -inf y-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ b (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ (* b x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI))))))))) (taylor -inf y-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ b (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ (* b x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI))))))))) (taylor -inf y-scale) (#s(alt (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) (patch (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf y-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf y-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf y-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf y-scale) (#s(alt (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (patch (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (PI)) (taylor -inf y-scale) (#s(alt (*.f64 y-scale (PI.f64)) (patch (*.f64 y-scale (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (PI)) (taylor -inf y-scale) (#s(alt (*.f64 y-scale (PI.f64)) (patch (*.f64 y-scale (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (PI)) (taylor -inf y-scale) (#s(alt (*.f64 y-scale (PI.f64)) (patch (*.f64 y-scale (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* y-scale (PI)) (taylor -inf y-scale) (#s(alt (*.f64 y-scale (PI.f64)) (patch (*.f64 y-scale (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf y-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf y-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf y-scale) (#s(alt (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) (patch (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) x-scale)) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale))))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale))))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale))))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) (patch (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (patch (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (patch (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #<representation binary64>) () ())) ())
Calls

15 calls:

TimeVariablePointExpression
22.0ms
b
@0
((* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI))))) (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (* x-scale (* 0 a)) (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (* 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))) (/ (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)) (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))) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ x-scale (* angle (* y-scale (PI)))) (* y-scale (PI)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (* (* a a) (+ (* -2 (/ (* (* b b) y-scale) (* (* a a) x-scale))) (* 2 (/ x-scale y-scale)))) (/ (* (* b b) y-scale) (* (* a a) x-scale)) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (cos (* (* (PI) angle) 1/180)) (cos (* (* (PI) angle) 1/180)) (sin (* (* (PI) angle) 1/180)))
21.0ms
angle
@0
((* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI))))) (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (* x-scale (* 0 a)) (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (* 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))) (/ (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)) (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))) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ x-scale (* angle (* y-scale (PI)))) (* y-scale (PI)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (* (* a a) (+ (* -2 (/ (* (* b b) y-scale) (* (* a a) x-scale))) (* 2 (/ x-scale y-scale)))) (/ (* (* b b) y-scale) (* (* a a) x-scale)) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (cos (* (* (PI) angle) 1/180)) (cos (* (* (PI) angle) 1/180)) (sin (* (* (PI) angle) 1/180)))
16.0ms
a
@0
((* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI))))) (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (* x-scale (* 0 a)) (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (* 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))) (/ (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)) (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))) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ x-scale (* angle (* y-scale (PI)))) (* y-scale (PI)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (* (* a a) (+ (* -2 (/ (* (* b b) y-scale) (* (* a a) x-scale))) (* 2 (/ x-scale y-scale)))) (/ (* (* b b) y-scale) (* (* a a) x-scale)) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (cos (* (* (PI) angle) 1/180)) (cos (* (* (PI) angle) 1/180)) (sin (* (* (PI) angle) 1/180)))
16.0ms
a
@inf
((* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI))))) (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (* x-scale (* 0 a)) (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (* 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))) (/ (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)) (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))) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ x-scale (* angle (* y-scale (PI)))) (* y-scale (PI)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (* (* a a) (+ (* -2 (/ (* (* b b) y-scale) (* (* a a) x-scale))) (* 2 (/ x-scale y-scale)))) (/ (* (* b b) y-scale) (* (* a a) x-scale)) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (cos (* (* (PI) angle) 1/180)) (cos (* (* (PI) angle) 1/180)) (sin (* (* (PI) angle) 1/180)))
16.0ms
b
@inf
((* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI))))) (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (* x-scale (* 0 a)) (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (* 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))) (/ (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)) (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))) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ x-scale (* angle (* y-scale (PI)))) (* y-scale (PI)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (* (* a a) (+ (* -2 (/ (* (* b b) y-scale) (* (* a a) x-scale))) (* 2 (/ x-scale y-scale)))) (/ (* (* b b) y-scale) (* (* a a) x-scale)) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (cos (* (* (PI) angle) 1/180)) (cos (* (* (PI) angle) 1/180)) (sin (* (* (PI) angle) 1/180)))

simplify1.2s (0.8%)

Memory
36.1MiB live, 2 504.9MiB allocated
Algorithm
1×egg-herbie
Rules
6 740×lower-*.f64
6 740×lower-*.f32
4 730×lower-fma.f64
4 730×lower-fma.f32
3 482×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01614340764
15774336777
08489328828
Stop Event
1×iter limit
1×node limit
Counts
1 704 → 1 704
Calls
Call 1
Inputs
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))
(+ (/ (* b (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(+ (* b (+ (* -1 (* b (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(+ (* b (+ (* b (+ (* -1 (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* b (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (* b (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI))))))))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* 2 (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* b (* x-scale (+ a (* -1 a)))) (* (pow a 2) (* angle (* y-scale (PI)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI))))))))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))) (pow a 2))) (/ (* x-scale (+ a (* -1 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))) (* 2 (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))))))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* b (* x-scale (+ a (* -1 a)))) (* (pow a 2) (* angle (* y-scale (PI)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI))))))))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))) (pow a 2))) (/ (* x-scale (+ a (* -1 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))) (* 2 (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))))))))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* b (* x-scale (+ a (* -1 a)))) (* (pow a 2) (* angle (* y-scale (PI)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI))))))))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))) (pow a 2))) (/ (* x-scale (+ a (* -1 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))) (* 2 (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* b (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (* b (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI))))))))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* 2 (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))))
(+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 3)) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* -2 (/ (+ (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI))))) (* (+ a (* -1 a)) (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* -2 (/ (+ (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI))))) (* (+ a (* -1 a)) (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* -2 (/ (+ (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI))))) (* (+ a (* -1 a)) (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) b)))
(+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) b)) (+ (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* b (* x-scale (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) b)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (+ (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) b))) b)) (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) b))) b)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI)))))) b))) b))) b)))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) b))) b)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI)))))) b))) b))) b)))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) b))) b)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI)))))) b))) b))) b)))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (+ (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) b))) b)) (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
0
0
0
0
0
0
0
0
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
0
0
0
0
(* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* a (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -1 (* a (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))))
(+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* a (+ (* -1 (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (* a (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (pow b 2)))))) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* a (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (* a (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))))
(+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -2 (* a (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (pow b 2))))) (* 2 (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* a (* y-scale (+ b (* -1 b)))) (* angle (* (pow b 2) (* x-scale (PI)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (* a (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))) (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))) (* a (+ (* -2 (* a (+ (* -1 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 4) (* x-scale (PI)))))) (/ (* (+ b (* -1 b)) (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))) (pow b 2))))) (* 2 (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* a (* y-scale (+ b (* -1 b)))) (* angle (* (pow b 2) (* x-scale (PI)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (* a (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))) (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))) (* a (+ (* -2 (* a (+ (* -1 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 4) (* x-scale (PI)))))) (/ (* (+ b (* -1 b)) (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))) (pow b 2))))) (* 2 (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))))))))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* a (* y-scale (+ b (* -1 b)))) (* angle (* (pow b 2) (* x-scale (PI)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (* a (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))) (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))) (* a (+ (* -2 (* a (+ (* -1 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 4) (* x-scale (PI)))))) (/ (* (+ b (* -1 b)) (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))) (pow b 2))))) (* 2 (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))))))))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* a (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (* a (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))))
(+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -2 (* a (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (pow b 2))))) (* 2 (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
0
0
0
0
0
0
0
0
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
0
0
0
0
(/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))
(+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))))
(+ (* -1 (/ (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 3))) (+ (* -1 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2)))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (pow a 3))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) (pow a 3))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) (pow a 3))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) (pow a 3))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2)))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (pow a 3))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
0
0
0
0
0
0
0
0
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
0
0
0
0
(/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))
(+ (* -1 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(+ (* -1 (/ (- (+ (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* a (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))))) a)) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* -1 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) a))) a)) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) a)) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* 2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a))) a)))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* 2 (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) a))) a))) a)))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) a))) a)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -1 (/ (+ (* 2 (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) a))) a))) a)))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) a))) a)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -1 (/ (+ (* 2 (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) a))) a))) a)))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) a))) a)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -1 (/ (+ (* 2 (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) a))) a))) a)))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* 2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a))) a)))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* 2 (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) a))) a))) a)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
0
0
0
0
0
0
0
0
(* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle))
(* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle))
(* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle))
(* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle))
(* -180 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* -1 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) angle)
(/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* -1 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle)
(/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* -1 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* -1 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a))))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle)
1
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(* 1/180 (* angle (PI)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a))))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle)
1
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
1
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(* 1/180 (* angle (PI)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
0
0
0
0
0
0
0
0
(* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle))
(* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle))
(* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle))
(* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
0
0
0
0
0
0
0
0
(* -2 (/ (* b (- (* -1 (/ y-scale (* (pow a 2) (* x-scale (PI))))) (* -1 (/ x-scale (* (pow a 2) (* y-scale (PI))))))) angle))
(* -2 (/ (* b (- (* -1 (/ y-scale (* (pow a 2) (* x-scale (PI))))) (* -1 (/ x-scale (* (pow a 2) (* y-scale (PI))))))) angle))
(* -2 (/ (* b (- (* -1 (/ y-scale (* (pow a 2) (* x-scale (PI))))) (* -1 (/ x-scale (* (pow a 2) (* y-scale (PI))))))) angle))
(* -2 (/ (* b (- (* -1 (/ y-scale (* (pow a 2) (* x-scale (PI))))) (* -1 (/ x-scale (* (pow a 2) (* y-scale (PI))))))) angle))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
0
0
0
0
0
0
0
0
(* 2 (/ (* b y-scale) (* (pow a 2) (* angle (* x-scale (PI))))))
(/ (+ (* -2 (/ (* b (pow x-scale 2)) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (PI)))))) x-scale)
(/ (+ (* -2 (/ (* b (pow x-scale 2)) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (PI)))))) x-scale)
(/ (+ (* -2 (/ (* b (pow x-scale 2)) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (PI)))))) x-scale)
0
0
0
0
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale)
(/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale)
(/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale)
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
0
0
0
0
0
0
0
0
(* -2 (/ (* b x-scale) (* (pow a 2) (* angle (* y-scale (PI))))))
(* x-scale (+ (* -2 (/ b (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI))))))))
(* x-scale (+ (* -2 (/ b (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI))))))))
(* x-scale (+ (* -2 (/ b (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI))))))))
0
0
0
0
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
0
0
0
0
0
0
0
0
(* -2 (/ (* b x-scale) (* (pow a 2) (* angle (* y-scale (PI))))))
(* -1 (* x-scale (+ (* -2 (/ (* b y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI)))))) (* 2 (/ b (* (pow a 2) (* angle (* y-scale (PI)))))))))
(* -1 (* x-scale (+ (* -2 (/ (* b y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI)))))) (* 2 (/ b (* (pow a 2) (* angle (* y-scale (PI)))))))))
(* -1 (* x-scale (+ (* -2 (/ (* b y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI)))))) (* 2 (/ b (* (pow a 2) (* angle (* y-scale (PI)))))))))
0
0
0
0
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2))))))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
0
0
0
0
0
0
0
0
(* -2 (/ (* b x-scale) (* (pow a 2) (* angle (* y-scale (PI))))))
(/ (+ (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (PI))))) (* 2 (/ (* b (pow y-scale 2)) (* (pow a 2) (* angle (* x-scale (PI))))))) y-scale)
(/ (+ (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (PI))))) (* 2 (/ (* b (pow y-scale 2)) (* (pow a 2) (* angle (* x-scale (PI))))))) y-scale)
(/ (+ (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (PI))))) (* 2 (/ (* b (pow y-scale 2)) (* (pow a 2) (* angle (* x-scale (PI))))))) y-scale)
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(* y-scale (PI))
(* y-scale (PI))
(* y-scale (PI))
(* y-scale (PI))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale)
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
0
0
0
0
0
0
0
0
(* 2 (/ (* b y-scale) (* (pow a 2) (* angle (* x-scale (PI))))))
(* y-scale (+ (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))) (* 2 (/ b (* (pow a 2) (* angle (* x-scale (PI))))))))
(* y-scale (+ (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))) (* 2 (/ b (* (pow a 2) (* angle (* x-scale (PI))))))))
(* y-scale (+ (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))) (* 2 (/ b (* (pow a 2) (* angle (* x-scale (PI))))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(* y-scale (PI))
(* y-scale (PI))
(* y-scale (PI))
(* y-scale (PI))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2)))))
(* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2)))))
(* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2)))))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
0
0
0
0
0
0
0
0
(* 2 (/ (* b y-scale) (* (pow a 2) (* angle (* x-scale (PI))))))
(* -1 (* y-scale (+ (* -2 (/ b (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ (* b x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))))))
(* -1 (* y-scale (+ (* -2 (/ b (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ (* b x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))))))
(* -1 (* y-scale (+ (* -2 (/ b (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ (* b x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(* y-scale (PI))
(* y-scale (PI))
(* y-scale (PI))
(* y-scale (PI))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale)))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale)))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale)))))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
Outputs
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))) (*.f64 b b) (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 b b) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))) (*.f64 a a))) (*.f64 b b) (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))))) (*.f64 b b) (*.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 b b) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))) (*.f64 b b) (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 b b) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))) (*.f64 a a))) (*.f64 b b) (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))))) (*.f64 b b) (*.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 b b) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))) (*.f64 b b) (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 b b) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))) (*.f64 a a))) (*.f64 b b) (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))))) (*.f64 b b) (*.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 b b) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))))
(/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))
(*.f64 y-scale (/.f64 (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)))
(+ (/ (* b (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(fma.f64 b (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (*.f64 y-scale (/.f64 (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))))
(+ (* b (+ (* -1 (* b (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(fma.f64 (fma.f64 (neg.f64 b) (neg.f64 (fma.f64 y-scale (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 a a) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 y-scale (+.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) (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 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) b (*.f64 y-scale (/.f64 (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))))
(+ (* b (+ (* b (+ (* -1 (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 0 binary64) (/.f64 (neg.f64 (fma.f64 y-scale (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 a a) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 y-scale (+.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) (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 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (*.f64 a a)) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) b (neg.f64 (neg.f64 (fma.f64 y-scale (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 a a) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 y-scale (+.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) (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 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))))) b (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) b (*.f64 y-scale (/.f64 (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))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (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))))
(+ (* -2 (/ (* b (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))
(*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (*.f64 y-scale (/.f64 (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)))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (* b (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI))))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) b) (neg.f64 (fma.f64 y-scale (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 a a) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 y-scale (+.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) (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 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (*.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) b (*.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (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)))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* 2 (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) b) (fma.f64 #s(literal 0 binary64) (/.f64 (neg.f64 (fma.f64 y-scale (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 a a) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 y-scale (+.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) (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 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (*.f64 a a)) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 (neg.f64 (fma.f64 y-scale (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 a a) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 y-scale (+.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) (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 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) #s(literal 2 binary64))) b (*.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) b (*.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (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)))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* b (* x-scale (+ a (* -1 a)))) (* (pow a 2) (* angle (* y-scale (PI)))))))
(*.f64 #s(literal -2 binary64) (fma.f64 b (/.f64 (*.f64 #s(literal 0 binary64) x-scale) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))) b (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))) (pow a 2))) (/ (* x-scale (+ a (* -1 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))) (* 2 (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) b) (fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))) (*.f64 a a)) (/.f64 (*.f64 #s(literal 0 binary64) x-scale) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale)))) (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))) #s(literal 2 binary64))) b (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))) b (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* b (* x-scale (+ a (* -1 a)))) (* (pow a 2) (* angle (* y-scale (PI)))))))
(*.f64 #s(literal -2 binary64) (fma.f64 b (/.f64 (*.f64 #s(literal 0 binary64) x-scale) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))) b (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))) (pow a 2))) (/ (* x-scale (+ a (* -1 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))) (* 2 (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) b) (fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))) (*.f64 a a)) (/.f64 (*.f64 #s(literal 0 binary64) x-scale) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale)))) (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))) #s(literal 2 binary64))) b (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))) b (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale) #s(literal 2 binary64))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(fma.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale) #s(literal 2 binary64)))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(fma.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale) #s(literal 2 binary64)))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(fma.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale) #s(literal 2 binary64)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))) (*.f64 b b) (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 b b) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))) (*.f64 a a))) (*.f64 b b) (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))))) (*.f64 b b) (*.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 b b) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* b (* x-scale (+ a (* -1 a)))) (* (pow a 2) (* angle (* y-scale (PI)))))))
(*.f64 #s(literal -2 binary64) (fma.f64 b (/.f64 (*.f64 #s(literal 0 binary64) x-scale) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))) b (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))) (pow a 2))) (/ (* x-scale (+ a (* -1 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))) (* 2 (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) b) (fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))) (*.f64 a a)) (/.f64 (*.f64 #s(literal 0 binary64) x-scale) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale)))) (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))) #s(literal 2 binary64))) b (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))) b (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (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))))
(+ (* -2 (/ (* b (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))
(*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (*.f64 y-scale (/.f64 (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)))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (* b (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI))))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) b) (neg.f64 (fma.f64 y-scale (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 a a) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 y-scale (+.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) (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 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (*.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) b (*.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (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)))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* 2 (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) b) (fma.f64 #s(literal 0 binary64) (/.f64 (neg.f64 (fma.f64 y-scale (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 a a) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 y-scale (+.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) (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 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (*.f64 a a)) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 (neg.f64 (fma.f64 y-scale (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 a a) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 y-scale (+.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) (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 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) #s(literal 2 binary64))) b (*.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) b (*.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (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)))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b)))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 a a))) (pow.f64 b #s(literal 6 binary64))) #s(literal 1/2 binary64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b)))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 a a))) (pow.f64 b #s(literal 6 binary64))) #s(literal 1/2 binary64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b)))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 a a))) (pow.f64 b #s(literal 6 binary64))) #s(literal 1/2 binary64)))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))))
(* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(*.f64 (neg.f64 y-scale) (/.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))) x-scale)))
(+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 (neg.f64 y-scale) (/.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))) x-scale)) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))))
(fma.f64 (neg.f64 y-scale) (/.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))) x-scale)) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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))) x-scale))))) (neg.f64 (*.f64 b b)))))
(+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 3)) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* (pow b 3) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
(fma.f64 (neg.f64 y-scale) (/.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))) x-scale)) (-.f64 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 b b) b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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))) x-scale)))))) (*.f64 (*.f64 b b) b)))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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))) x-scale))))) (*.f64 b b))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -2 binary64) (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))
(fma.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.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))) x-scale)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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))) x-scale))))) (*.f64 b b)))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))
(fma.f64 #s(literal -2 binary64) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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))) x-scale))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 #s(literal 0 binary64) (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))) x-scale))) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.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))) x-scale)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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))) x-scale))))) (*.f64 b b)))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(fma.f64 (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))
(fma.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle)) (/.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 b b)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* -2 (/ (+ (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI))))) (* (+ a (* -1 a)) (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))
(fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 (*.f64 (neg.f64 a) a) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle)) (/.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 b b)))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(fma.f64 (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))
(fma.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle)) (/.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 b b)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* -2 (/ (+ (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI))))) (* (+ a (* -1 a)) (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))
(fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 (*.f64 (neg.f64 a) a) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle)) (/.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 b b)))))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) #s(literal -2 binary64))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(*.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 b b) y-scale))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64))) (*.f64 b b))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(*.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 b b) y-scale))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64))) (*.f64 b b))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(*.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 b b) y-scale))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64))) (*.f64 b b))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b)))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 a a))) (pow.f64 b #s(literal 6 binary64))) #s(literal 1/2 binary64)))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(fma.f64 (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))
(fma.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle)) (/.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 b b)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* -2 (/ (+ (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI))))) (* (+ a (* -1 a)) (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))
(fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 (*.f64 (neg.f64 a) a) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle)) (/.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 b b)))))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -2 binary64) (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))
(fma.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.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))) x-scale)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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))) x-scale))))) (*.f64 b b)))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))
(fma.f64 #s(literal -2 binary64) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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))) x-scale))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 #s(literal 0 binary64) (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))) x-scale))) (*.f64 (*.f64 b b) b))) (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.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))) x-scale)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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))) x-scale))))) (*.f64 b b)))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b)))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 a a))) (pow.f64 b #s(literal 6 binary64))) #s(literal 1/2 binary64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b)))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 a a))) (pow.f64 b #s(literal 6 binary64))) #s(literal 1/2 binary64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b)))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 a a))) (pow.f64 b #s(literal 6 binary64))) #s(literal 1/2 binary64)))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))))
(* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))
(*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))))
(* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(*.f64 (neg.f64 y-scale) (/.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))) x-scale)))
(+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 (neg.f64 y-scale) (/.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))) x-scale)) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) b)))
(neg.f64 (fma.f64 y-scale (/.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))) x-scale)) (/.f64 (-.f64 (/.f64 (neg.f64 (fma.f64 (*.f64 a a) (*.f64 y-scale (/.f64 (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))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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))) x-scale))))) (neg.f64 b)) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)))) b)))
(+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) b)) (+ (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* b (* x-scale (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) b)))
(neg.f64 (fma.f64 y-scale (/.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))) x-scale)) (/.f64 (-.f64 (/.f64 (fma.f64 #s(literal 0 binary64) (/.f64 (neg.f64 (fma.f64 (*.f64 a a) (*.f64 y-scale (/.f64 (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))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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))) x-scale))))) b) (-.f64 (fma.f64 (*.f64 (neg.f64 a) a) (*.f64 y-scale (/.f64 (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 a a) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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))) x-scale))))) (neg.f64 b)) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)))) b)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -2 binary64) (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))
(+ (* -1 (/ (+ (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (neg.f64 (fma.f64 (*.f64 a a) (*.f64 y-scale (/.f64 (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))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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))) x-scale))))) b))) (neg.f64 b)))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) b))) b)) (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64) (/.f64 (fma.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 0 binary64) (neg.f64 (fma.f64 (*.f64 a a) (*.f64 y-scale (/.f64 (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))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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))) x-scale))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 #s(literal 0 binary64) (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))) x-scale))) b) (neg.f64 (fma.f64 (*.f64 a a) (*.f64 y-scale (/.f64 (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))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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))) x-scale))))))) (neg.f64 b))) (neg.f64 b)))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(fma.f64 (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) b))) b)))
(fma.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64) (/.f64 (fma.f64 (/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle)))))) b) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) angle))) (neg.f64 b)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI)))))) b))) b))) b)))
(fma.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64) (/.f64 (fma.f64 (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 0 binary64) (neg.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle)))))) (*.f64 (*.f64 (neg.f64 a) a) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) b) (neg.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle)))))))) (neg.f64 b))) (neg.f64 b)))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(fma.f64 (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) b))) b)))
(fma.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64) (/.f64 (fma.f64 (/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle)))))) b) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) angle))) (neg.f64 b)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI)))))) b))) b))) b)))
(fma.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64) (/.f64 (fma.f64 (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 0 binary64) (neg.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle)))))) (*.f64 (*.f64 (neg.f64 a) a) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) b) (neg.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle)))))))) (neg.f64 b))) (neg.f64 b)))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) #s(literal -2 binary64))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(*.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 b b) y-scale))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64))) (*.f64 b b))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(*.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 b b) y-scale))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64))) (*.f64 b b))
(* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))
(*.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 b b) y-scale))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64))) (*.f64 b b))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b)))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 a a))) (pow.f64 b #s(literal 6 binary64))) #s(literal 1/2 binary64)))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(fma.f64 (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) b))) b)))
(fma.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64) (/.f64 (fma.f64 (/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle)))))) b) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) angle))) (neg.f64 b)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI)))))) b))) b))) b)))
(fma.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64) (/.f64 (fma.f64 (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 0 binary64) (neg.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle)))))) (*.f64 (*.f64 (neg.f64 a) a) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) b) (neg.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle)))))))) (neg.f64 b))) (neg.f64 b)))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -2 binary64) (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))
(+ (* -1 (/ (+ (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (neg.f64 (fma.f64 (*.f64 a a) (*.f64 y-scale (/.f64 (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))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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))) x-scale))))) b))) (neg.f64 b)))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) b))) b)) (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64) (/.f64 (fma.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 0 binary64) (neg.f64 (fma.f64 (*.f64 a a) (*.f64 y-scale (/.f64 (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))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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))) x-scale))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 #s(literal 0 binary64) (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))) x-scale))) b) (neg.f64 (fma.f64 (*.f64 a a) (*.f64 y-scale (/.f64 (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))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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))) x-scale))))))) (neg.f64 b))) (neg.f64 b)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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) (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))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))) (*.f64 a a) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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) (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)))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))) (*.f64 b b))) (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))))) (*.f64 a a) (*.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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) (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)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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) (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))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))) (*.f64 a a) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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) (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)))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))) (*.f64 b b))) (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))))) (*.f64 a a) (*.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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) (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)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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) (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))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))) (*.f64 a a) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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) (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)))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))) (*.f64 b b))) (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))))) (*.f64 a a) (*.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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) (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)))
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 a a))) #s(literal 2 binary64))
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 a a))) #s(literal 2 binary64))
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 a a))) #s(literal 2 binary64))
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 a a))) #s(literal 2 binary64))
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(*.f64 (neg.f64 y-scale) (/.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))) x-scale)))
(+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* a (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 a (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (*.f64 (neg.f64 y-scale) (/.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))) x-scale))))
(+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -1 (* a (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))))
(fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (*.f64 y-scale (+.f64 (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (neg.f64 a) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) a (*.f64 (neg.f64 y-scale) (/.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))) x-scale))))
(+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* a (+ (* -1 (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (* a (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (pow b 2)))))) (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (*.f64 y-scale (+.f64 (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (*.f64 b b)) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) a (neg.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (*.f64 y-scale (+.f64 (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))))) a (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) a (*.f64 (neg.f64 y-scale) (/.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))) x-scale))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64))
(+ (* -2 (/ (* a (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 (*.f64 a (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -2 binary64) (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))
(+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (* a (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) a) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (*.f64 y-scale (+.f64 (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -2 binary64))) a (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))
(+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -2 (* a (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (pow b 2))))) (* 2 (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) a) (fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (*.f64 y-scale (+.f64 (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (*.f64 b b)) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (*.f64 y-scale (+.f64 (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) #s(literal 2 binary64))) a (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -2 binary64))) a (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* a (* y-scale (+ b (* -1 b)))) (* angle (* (pow b 2) (* x-scale (PI)))))))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) y-scale) a) (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (* a (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))) (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))) (*.f64 (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (PI.f64)) angle)) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale))) (/.f64 y-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))))) a))) a (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))) (* a (+ (* -2 (* a (+ (* -1 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 4) (* x-scale (PI)))))) (/ (* (+ b (* -1 b)) (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))) (pow b 2))))) (* 2 (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) a) (fma.f64 (neg.f64 y-scale) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale))) (*.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (PI.f64)) angle)) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale))) (/.f64 y-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))))) (*.f64 b b)))) (*.f64 (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (PI.f64)) angle)) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale))) (/.f64 y-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))))) #s(literal 2 binary64))) a (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) y-scale)) (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale)))) a (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* a (* y-scale (+ b (* -1 b)))) (* angle (* (pow b 2) (* x-scale (PI)))))))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) y-scale) a) (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (* a (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))) (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))) (*.f64 (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (PI.f64)) angle)) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale))) (/.f64 y-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))))) a))) a (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))) (* a (+ (* -2 (* a (+ (* -1 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 4) (* x-scale (PI)))))) (/ (* (+ b (* -1 b)) (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))) (pow b 2))))) (* 2 (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) a) (fma.f64 (neg.f64 y-scale) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale))) (*.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (PI.f64)) angle)) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale))) (/.f64 y-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))))) (*.f64 b b)))) (*.f64 (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (PI.f64)) angle)) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale))) (/.f64 y-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))))) #s(literal 2 binary64))) a (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) y-scale)) (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale)))) a (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) #s(literal -2 binary64))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(fma.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale) #s(literal 2 binary64)))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(fma.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale) #s(literal 2 binary64)))
(+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))
(fma.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale) #s(literal 2 binary64)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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) (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))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))) (*.f64 a a) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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) (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)))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))) (*.f64 b b))) (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))))) (*.f64 a a) (*.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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) (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)))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* a (* y-scale (+ b (* -1 b)))) (* angle (* (pow b 2) (* x-scale (PI)))))))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) y-scale) a) (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (* a (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))) (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))) (*.f64 (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (PI.f64)) angle)) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale))) (/.f64 y-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))))) a))) a (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))) (* a (+ (* -2 (* a (+ (* -1 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 4) (* x-scale (PI)))))) (/ (* (+ b (* -1 b)) (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))) (pow b 2))))) (* 2 (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) a) (fma.f64 (neg.f64 y-scale) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale))) (*.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (PI.f64)) angle)) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale))) (/.f64 y-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))))) (*.f64 b b)))) (*.f64 (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (PI.f64)) angle)) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale))) (/.f64 y-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))))) #s(literal 2 binary64))) a (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) y-scale)) (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale)))) a (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64))
(+ (* -2 (/ (* a (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 (*.f64 a (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -2 binary64) (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))
(+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (* a (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) a) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (*.f64 y-scale (+.f64 (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -2 binary64))) a (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))
(+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -2 (* a (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (pow b 2))))) (* 2 (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) a) (fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (*.f64 y-scale (+.f64 (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (*.f64 b b)) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (*.f64 y-scale (+.f64 (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) #s(literal 2 binary64))) a (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -2 binary64))) a (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.f64 (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 b b))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.f64 (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 b b))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.f64 (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 b b))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)))))
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 a a))) #s(literal 2 binary64))
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 a a))) #s(literal 2 binary64))
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 a a))) #s(literal 2 binary64))
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 a a))) #s(literal 2 binary64))
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))
(*.f64 y-scale (/.f64 (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 (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))))
(*.f64 y-scale (+.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 a x-scale) (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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))))
(+ (* -1 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))))
(-.f64 (*.f64 y-scale (+.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 a x-scale) (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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)))) (/.f64 (neg.f64 (fma.f64 (*.f64 b b) (*.f64 y-scale (/.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))) x-scale))) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale))))) (*.f64 a a)))
(+ (* -1 (/ (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 3))) (+ (* -1 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* (pow a 3) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))
(fma.f64 #s(literal 0 binary64) (/.f64 (neg.f64 (fma.f64 (*.f64 b b) (*.f64 y-scale (/.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))) x-scale))) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale))))) (*.f64 (*.f64 a a) a)) (-.f64 (fma.f64 y-scale (+.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 a x-scale) (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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (/.f64 (neg.f64 (fma.f64 (*.f64 b b) (*.f64 y-scale (/.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))) x-scale))) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale))))) (*.f64 a a))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (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))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))))
(*.f64 #s(literal -2 binary64) (*.f64 y-scale (+.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 a x-scale) (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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2)))))
(fma.f64 #s(literal -2 binary64) (*.f64 y-scale (+.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 a x-scale) (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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)))) (*.f64 (/.f64 (neg.f64 (fma.f64 (*.f64 b b) (*.f64 y-scale (/.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))) x-scale))) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale))))) (*.f64 a a)) #s(literal 2 binary64)))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (pow a 3))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))))))
(fma.f64 #s(literal -2 binary64) (*.f64 y-scale (+.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 a x-scale) (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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)))) (fma.f64 (/.f64 (fma.f64 (neg.f64 (fma.f64 (*.f64 b b) (*.f64 y-scale (/.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))) x-scale))) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale))))) #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 0 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 a a) a)) #s(literal -2 binary64) (*.f64 (/.f64 (neg.f64 (fma.f64 (*.f64 b b) (*.f64 y-scale (/.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))) x-scale))) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale))))) (*.f64 a a)) #s(literal 2 binary64))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(*.f64 #s(literal -2 binary64) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))
(fma.f64 #s(literal -2 binary64) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (*.f64 a a)) #s(literal 2 binary64)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) (pow a 3))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))
(fma.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64) (fma.f64 #s(literal -2 binary64) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a)) (/.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) #s(literal 0 binary64)) (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 (*.f64 a a) a))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (*.f64 a a)) #s(literal 2 binary64))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(*.f64 #s(literal -2 binary64) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))
(fma.f64 #s(literal -2 binary64) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (*.f64 a a)) #s(literal 2 binary64)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) (pow a 3))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))
(fma.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64) (fma.f64 #s(literal -2 binary64) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a)) (/.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) #s(literal 0 binary64)) (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 (*.f64 a a) a))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (*.f64 a a)) #s(literal 2 binary64))))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale) #s(literal 2 binary64))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(*.f64 (fma.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 a a) x-scale))) (*.f64 a a))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(*.f64 (fma.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 a a) x-scale))) (*.f64 a a))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(*.f64 (fma.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 a a) x-scale))) (*.f64 a a))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.f64 (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 b b))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(*.f64 #s(literal -2 binary64) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))
(fma.f64 #s(literal -2 binary64) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (*.f64 a a)) #s(literal 2 binary64)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) (pow a 3))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))
(fma.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64) (fma.f64 #s(literal -2 binary64) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a)) (/.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) #s(literal 0 binary64)) (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 (*.f64 a a) a))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (*.f64 a a)) #s(literal 2 binary64))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (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))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))))
(*.f64 #s(literal -2 binary64) (*.f64 y-scale (+.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 a x-scale) (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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2)))))
(fma.f64 #s(literal -2 binary64) (*.f64 y-scale (+.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 a x-scale) (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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)))) (*.f64 (/.f64 (neg.f64 (fma.f64 (*.f64 b b) (*.f64 y-scale (/.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))) x-scale))) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale))))) (*.f64 a a)) #s(literal 2 binary64)))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (pow a 3))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))))))
(fma.f64 #s(literal -2 binary64) (*.f64 y-scale (+.f64 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 a x-scale) (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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)))) (fma.f64 (/.f64 (fma.f64 (neg.f64 (fma.f64 (*.f64 b b) (*.f64 y-scale (/.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))) x-scale))) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale))))) #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 0 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 a a) a)) #s(literal -2 binary64) (*.f64 (/.f64 (neg.f64 (fma.f64 (*.f64 b b) (*.f64 y-scale (/.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))) x-scale))) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale))))) (*.f64 a a)) #s(literal 2 binary64))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.f64 (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 b b))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.f64 (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 b b))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.f64 (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 b b))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)))))
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 a a))) #s(literal 2 binary64))
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 a a))) #s(literal 2 binary64))
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 a a))) #s(literal 2 binary64))
(* 2 (/ (* b (- (/ y-scale (* angle (* x-scale (PI)))) (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 a a))) #s(literal 2 binary64))
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))
(*.f64 y-scale (/.f64 (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)))
(+ (* -1 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(fma.f64 (neg.f64 y-scale) (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 a x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 y-scale (/.f64 (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))))
(+ (* -1 (/ (- (+ (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* a (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))))) a)) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(fma.f64 y-scale (/.f64 (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 (fma.f64 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) y-scale) (*.f64 (*.f64 a x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) y-scale) (*.f64 (*.f64 a x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 a x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (neg.f64 a)))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* -1 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) a))) a)) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) a)) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(fma.f64 y-scale (/.f64 (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 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 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 (fma.f64 (neg.f64 (fma.f64 (*.f64 b b) (*.f64 y-scale (/.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))) x-scale))) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale))))) #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 0 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 a)) (neg.f64 (fma.f64 (*.f64 b b) (*.f64 y-scale (/.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))) x-scale))) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale)))))) (neg.f64 a))) (neg.f64 a)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (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))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* 2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))))
(fma.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 a x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (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)))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a))) a)))
(fma.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (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 #s(literal -2 binary64) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 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 (fma.f64 (*.f64 b b) (*.f64 y-scale (/.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))) x-scale))) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale))))) a))) (neg.f64 a)))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* 2 (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) a))) a))) a)))
(fma.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (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 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale)) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (fma.f64 (neg.f64 (fma.f64 (*.f64 b b) (*.f64 y-scale (/.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))) x-scale))) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale))))) #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 0 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))) a) (neg.f64 (fma.f64 (*.f64 b b) (*.f64 y-scale (/.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))) x-scale))) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale))))))) (neg.f64 a))) (neg.f64 a)))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(fma.f64 (*.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a))) #s(literal 2 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) a))) a)))
(fma.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (/.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) a))) (neg.f64 a)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -1 (/ (+ (* 2 (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) a))) a))) a)))
(fma.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64) (/.f64 (fma.f64 (*.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) #s(literal 0 binary64)) (*.f64 (*.f64 (PI.f64) y-scale) angle))) a) (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))))) (neg.f64 a))) (neg.f64 a)))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(fma.f64 (*.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a))) #s(literal 2 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) a))) a)))
(fma.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (/.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) a))) (neg.f64 a)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -1 (/ (+ (* 2 (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) a))) a))) a)))
(fma.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64) (/.f64 (fma.f64 (*.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) #s(literal 0 binary64)) (*.f64 (*.f64 (PI.f64) y-scale) angle))) a) (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))))) (neg.f64 a))) (neg.f64 a)))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale) #s(literal 2 binary64))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(*.f64 (fma.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 a a) x-scale))) (*.f64 a a))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(*.f64 (fma.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 a a) x-scale))) (*.f64 a a))
(* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))
(*.f64 (fma.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 a a) x-scale))) (*.f64 a a))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.f64 (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 b b))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (neg.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 b b) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(fma.f64 (*.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a))) #s(literal 2 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) a))) a)))
(fma.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (/.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) a))) (neg.f64 a)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -1 (/ (+ (* 2 (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) a))) a))) a)))
(fma.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64) (/.f64 (fma.f64 (*.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (fma.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) #s(literal 0 binary64)) (*.f64 (*.f64 (PI.f64) y-scale) angle))) a) (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))))) (neg.f64 a))) (neg.f64 a)))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (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))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* 2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))))
(fma.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 a x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (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)))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a))) a)))
(fma.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (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 #s(literal -2 binary64) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 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 (fma.f64 (*.f64 b b) (*.f64 y-scale (/.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))) x-scale))) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale))))) a))) (neg.f64 a)))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* 2 (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) a))) a))) a)))
(fma.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (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 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale)) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (fma.f64 (neg.f64 (fma.f64 (*.f64 b b) (*.f64 y-scale (/.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))) x-scale))) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale))))) #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 0 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))) a) (neg.f64 (fma.f64 (*.f64 b b) (*.f64 y-scale (/.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))) x-scale))) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale))))))) (neg.f64 a))) (neg.f64 a)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (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 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 angle angle)) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.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 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/102036672000000 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (*.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)))))) #s(literal 1/2 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64)) (fma.f64 #s(literal 180 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -29/30855889612800000000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) #s(literal 32400 binary64)))) (*.f64 angle angle) (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (*.f64 angle angle) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) #s(literal 1/2 binary64))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (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 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 angle angle)) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.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 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/102036672000000 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (*.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)))))) #s(literal 1/2 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64)) (fma.f64 #s(literal 180 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -29/30855889612800000000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) #s(literal 32400 binary64)))) (*.f64 angle angle) (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (*.f64 angle angle) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) #s(literal 1/2 binary64))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (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 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 angle angle)) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.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 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/102036672000000 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (*.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)))))) #s(literal 1/2 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64)) (fma.f64 #s(literal 180 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -29/30855889612800000000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) #s(literal 32400 binary64)))) (*.f64 angle angle) (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (*.f64 angle angle) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) #s(literal 1/2 binary64))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) x-scale) (PI.f64))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) y-scale) (PI.f64)))) angle)) #s(literal 2 binary64))
(* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) x-scale) (PI.f64))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) y-scale) (PI.f64)))) angle)) #s(literal 2 binary64))
(* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) x-scale) (PI.f64))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) y-scale) (PI.f64)))) angle)) #s(literal 2 binary64))
(* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) x-scale) (PI.f64))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) y-scale) (PI.f64)))) angle)) #s(literal 2 binary64))
(* -180 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 #s(literal -180 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* -1 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) angle)
(/.f64 (fma.f64 (neg.f64 (*.f64 angle angle)) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (/.f64 (*.f64 #s(literal -180 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))))) angle)
(/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* -1 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle)
(/.f64 (fma.f64 (neg.f64 (fma.f64 (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))))) (*.f64 angle angle) (/.f64 (*.f64 #s(literal -180 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))))) angle)
(/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* -1 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* -1 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle)
(/.f64 (fma.f64 (fma.f64 (neg.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 a a) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 b b))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64)) (fma.f64 #s(literal 180 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (fma.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -29/30855889612800000000 binary64)))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))) #s(literal 32400 binary64)))) (*.f64 angle angle) (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))))) (*.f64 angle angle) (/.f64 (*.f64 #s(literal -180 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))))) angle)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 #s(literal 360 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(/ (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a))))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle angle)) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (/.f64 (*.f64 #s(literal 360 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))))) (*.f64 angle angle) (/.f64 (*.f64 #s(literal 360 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle)
(/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 a a) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 b b))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64)) (fma.f64 #s(literal 180 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (fma.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -29/30855889612800000000 binary64)))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))) #s(literal 32400 binary64)))) (*.f64 angle angle) (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))))) (*.f64 angle angle) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) #s(literal 2 binary64))) (*.f64 angle angle) (/.f64 (*.f64 #s(literal 360 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))))) angle)
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 angle angle) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 angle angle) (*.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 angle angle) #s(literal 1 binary64))
(* 1/180 (* angle (PI)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle)
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle)
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64))) (*.f64 angle angle) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle)
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (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 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 angle angle)) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (*.f64 (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.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 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/102036672000000 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (*.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)))))) #s(literal 1/2 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64)) (fma.f64 #s(literal 180 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -29/30855889612800000000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) #s(literal 32400 binary64)))) (*.f64 angle angle) (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (*.f64 angle angle) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) #s(literal 1/2 binary64))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 #s(literal 360 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(/ (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a))))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle angle)) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (/.f64 (*.f64 #s(literal 360 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))))) (*.f64 angle angle) (/.f64 (*.f64 #s(literal 360 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle)
(/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 a a) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 b b))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64)) (fma.f64 #s(literal 180 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (fma.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -29/30855889612800000000 binary64)))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))) #s(literal 32400 binary64)))) (*.f64 angle angle) (fma.f64 #s(literal 180 binary64) (-.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 b b))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1417176000000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))))) (*.f64 angle angle) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/32400 binary64) (*.f64 a a) (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) #s(literal 2 binary64))) (*.f64 angle angle) (/.f64 (*.f64 #s(literal 360 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))))) angle)
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 angle angle) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 angle angle) (*.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 angle angle) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 angle angle) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 angle angle) (*.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 angle angle) #s(literal 1 binary64))
(* 1/180 (* angle (PI)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle)
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle)
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64))) (*.f64 angle angle) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) x-scale) (PI.f64))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) y-scale) (PI.f64)))) angle)) #s(literal 2 binary64))
(* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) x-scale) (PI.f64))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) y-scale) (PI.f64)))) angle)) #s(literal 2 binary64))
(* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) x-scale) (PI.f64))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) y-scale) (PI.f64)))) angle)) #s(literal 2 binary64))
(* 2 (/ (* b (- (/ y-scale (* (pow a 2) (* x-scale (PI)))) (/ x-scale (* (pow a 2) (* y-scale (PI)))))) angle))
(*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) x-scale) (PI.f64))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) y-scale) (PI.f64)))) angle)) #s(literal 2 binary64))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* -2 (/ (* b (- (* -1 (/ y-scale (* (pow a 2) (* x-scale (PI))))) (* -1 (/ x-scale (* (pow a 2) (* y-scale (PI))))))) angle))
(*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (neg.f64 y-scale) (*.f64 (*.f64 (*.f64 a a) x-scale) (PI.f64))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) y-scale) (PI.f64)))) b) angle) #s(literal -2 binary64))
(* -2 (/ (* b (- (* -1 (/ y-scale (* (pow a 2) (* x-scale (PI))))) (* -1 (/ x-scale (* (pow a 2) (* y-scale (PI))))))) angle))
(*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (neg.f64 y-scale) (*.f64 (*.f64 (*.f64 a a) x-scale) (PI.f64))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) y-scale) (PI.f64)))) b) angle) #s(literal -2 binary64))
(* -2 (/ (* b (- (* -1 (/ y-scale (* (pow a 2) (* x-scale (PI))))) (* -1 (/ x-scale (* (pow a 2) (* y-scale (PI))))))) angle))
(*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (neg.f64 y-scale) (*.f64 (*.f64 (*.f64 a a) x-scale) (PI.f64))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) y-scale) (PI.f64)))) b) angle) #s(literal -2 binary64))
(* -2 (/ (* b (- (* -1 (/ y-scale (* (pow a 2) (* x-scale (PI))))) (* -1 (/ x-scale (* (pow a 2) (* y-scale (PI))))))) angle))
(*.f64 (/.f64 (*.f64 (+.f64 (/.f64 (neg.f64 y-scale) (*.f64 (*.f64 (*.f64 a a) x-scale) (PI.f64))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) y-scale) (PI.f64)))) b) angle) #s(literal -2 binary64))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal -1/2 binary64))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal -1/2 binary64))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal -1/2 binary64))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* 2 (/ (* b y-scale) (* (pow a 2) (* angle (* x-scale (PI))))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale)))
(/ (+ (* -2 (/ (* b (pow x-scale 2)) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (PI)))))) x-scale)
(/.f64 (fma.f64 (/.f64 (*.f64 b y-scale) (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x-scale x-scale) b)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))) x-scale)
(/ (+ (* -2 (/ (* b (pow x-scale 2)) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (PI)))))) x-scale)
(/.f64 (fma.f64 (/.f64 (*.f64 b y-scale) (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x-scale x-scale) b)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))) x-scale)
(/ (+ (* -2 (/ (* b (pow x-scale 2)) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (PI)))))) x-scale)
(/.f64 (fma.f64 (/.f64 (*.f64 b y-scale) (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 x-scale x-scale) b)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))) x-scale)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) x-scale)
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) x-scale)
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) #s(literal -2 binary64))
(/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) y-scale)) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64))) x-scale)
(/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) y-scale)) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64))) x-scale)
(/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) y-scale)) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64))) x-scale)
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal -1/2 binary64))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) x-scale)
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64)))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64)))) #s(literal -1/4 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64)))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64)))) #s(literal -1/4 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64)))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64)))) #s(literal -1/4 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64))))) x-scale)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* -2 (/ (* b x-scale) (* (pow a 2) (* angle (* y-scale (PI))))))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))
(* x-scale (+ (* -2 (/ b (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 b y-scale) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (*.f64 x-scale x-scale) (PI.f64)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))) x-scale)
(* x-scale (+ (* -2 (/ b (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 b y-scale) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (*.f64 x-scale x-scale) (PI.f64)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))) x-scale)
(* x-scale (+ (* -2 (/ b (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* b y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 b y-scale) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (*.f64 x-scale x-scale) (PI.f64)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) b) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))) x-scale)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) x-scale)
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) x-scale)
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) x-scale)
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) x-scale)
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) x-scale)
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) x-scale)
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale) #s(literal 2 binary64))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))
(*.f64 (fma.f64 (/.f64 (*.f64 a a) y-scale) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 x-scale x-scale))) x-scale)
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))
(*.f64 (fma.f64 (/.f64 (*.f64 a a) y-scale) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 x-scale x-scale))) x-scale)
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))
(*.f64 (fma.f64 (/.f64 (*.f64 a a) y-scale) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 x-scale x-scale))) x-scale)
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64)))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64)))) #s(literal -1/4 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64))))) x-scale)
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) x-scale)
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) x-scale)
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) x-scale)
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))) (neg.f64 x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64)))) (neg.f64 x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64)))) #s(literal -1/4 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))) (neg.f64 x-scale))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))) (neg.f64 x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64)))) (neg.f64 x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64)))) #s(literal -1/4 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))) (neg.f64 x-scale))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))) (neg.f64 x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64)))) (neg.f64 x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64)))) #s(literal -1/4 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))) (neg.f64 x-scale))
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* -2 (/ (* b x-scale) (* (pow a 2) (* angle (* y-scale (PI))))))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))
(* -1 (* x-scale (+ (* -2 (/ (* b y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI)))))) (* 2 (/ b (* (pow a 2) (* angle (* y-scale (PI)))))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 b y-scale) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (*.f64 x-scale x-scale) (PI.f64)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) b) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))))
(* -1 (* x-scale (+ (* -2 (/ (* b y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI)))))) (* 2 (/ b (* (pow a 2) (* angle (* y-scale (PI)))))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 b y-scale) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (*.f64 x-scale x-scale) (PI.f64)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) b) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))))
(* -1 (* x-scale (+ (* -2 (/ (* b y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI)))))) (* 2 (/ b (* (pow a 2) (* angle (* y-scale (PI)))))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 b y-scale) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (*.f64 x-scale x-scale) (PI.f64)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) b) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))))
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale) #s(literal 2 binary64))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 a a) y-scale) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 x-scale x-scale))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 a a) y-scale) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 x-scale x-scale))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 a a) y-scale) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 x-scale x-scale))))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))) (neg.f64 x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64)))) (neg.f64 x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64)))) #s(literal -1/4 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))) (neg.f64 x-scale))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 4 binary64)))) #s(literal -1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 4 binary64)))) #s(literal -1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 4 binary64)))) #s(literal -1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* -2 (/ (* b x-scale) (* (pow a 2) (* angle (* y-scale (PI))))))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))
(/ (+ (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (PI))))) (* 2 (/ (* b (pow y-scale 2)) (* (pow a 2) (* angle (* x-scale (PI))))))) y-scale)
(/.f64 (fma.f64 (/.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)))) y-scale)
(/ (+ (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (PI))))) (* 2 (/ (* b (pow y-scale 2)) (* (pow a 2) (* angle (* x-scale (PI))))))) y-scale)
(/.f64 (fma.f64 (/.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)))) y-scale)
(/ (+ (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (PI))))) (* 2 (/ (* b (pow y-scale 2)) (* (pow a 2) (* angle (* x-scale (PI))))))) y-scale)
(/.f64 (fma.f64 (/.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)))) y-scale)
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(* y-scale (PI))
(*.f64 (PI.f64) y-scale)
(* y-scale (PI))
(*.f64 (PI.f64) y-scale)
(* y-scale (PI))
(*.f64 (PI.f64) y-scale)
(* y-scale (PI))
(*.f64 (PI.f64) y-scale)
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)
(* 2 (/ (* (pow a 2) x-scale) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale) #s(literal 2 binary64))
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) x-scale)) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) x-scale)) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) x-scale)) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64))) y-scale)
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 4 binary64)))) #s(literal -1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64)))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64))))) y-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64)))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64))))) y-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64)))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64))))) y-scale)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* 2 (/ (* b y-scale) (* (pow a 2) (* angle (* x-scale (PI))))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale)))
(* y-scale (+ (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))) (* 2 (/ b (* (pow a 2) (* angle (* x-scale (PI))))))))
(*.f64 (fma.f64 (/.f64 b (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (*.f64 y-scale y-scale) (PI.f64))))) y-scale)
(* y-scale (+ (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))) (* 2 (/ b (* (pow a 2) (* angle (* x-scale (PI))))))))
(*.f64 (fma.f64 (/.f64 b (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (*.f64 y-scale y-scale) (PI.f64))))) y-scale)
(* y-scale (+ (* -2 (/ (* b x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))) (* 2 (/ b (* (pow a 2) (* angle (* x-scale (PI))))))))
(*.f64 (fma.f64 (/.f64 b (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (*.f64 y-scale y-scale) (PI.f64))))) y-scale)
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) y-scale)
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) y-scale)
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) y-scale)
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(* y-scale (PI))
(*.f64 (PI.f64) y-scale)
(* y-scale (PI))
(*.f64 (PI.f64) y-scale)
(* y-scale (PI))
(*.f64 (PI.f64) y-scale)
(* y-scale (PI))
(*.f64 (PI.f64) y-scale)
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) y-scale)
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) y-scale)
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) y-scale)
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) #s(literal -2 binary64))
(* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2)))))
(*.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -2 binary64))) y-scale)
(* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2)))))
(*.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -2 binary64))) y-scale)
(* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2)))))
(*.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -2 binary64))) y-scale)
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64)))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64))))) y-scale)
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) y-scale)
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) y-scale)
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) y-scale)
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64)))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/8 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64)))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/8 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64)))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/8 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))))
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* 2 (/ (* b y-scale) (* (pow a 2) (* angle (* x-scale (PI))))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale)))
(* -1 (* y-scale (+ (* -2 (/ b (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ (* b x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 b (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (*.f64 y-scale y-scale) (PI.f64))))))
(* -1 (* y-scale (+ (* -2 (/ b (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ (* b x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 b (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (*.f64 y-scale y-scale) (PI.f64))))))
(* -1 (* y-scale (+ (* -2 (/ b (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ (* b x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 b (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (*.f64 y-scale y-scale) (PI.f64))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(* y-scale (PI))
(*.f64 (PI.f64) y-scale)
(* y-scale (PI))
(*.f64 (PI.f64) y-scale)
(* y-scale (PI))
(*.f64 (PI.f64) y-scale)
(* y-scale (PI))
(*.f64 (PI.f64) y-scale)
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -2 (/ (* (pow b 2) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) #s(literal -2 binary64))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale)))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 y-scale y-scale))) #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal 2 binary64))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale)))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 y-scale y-scale))) #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal 2 binary64))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale)))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 y-scale y-scale))) #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal 2 binary64))))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64)))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/8 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))

rewrite392.0ms (0.3%)

Memory
3.9MiB live, 473.9MiB allocated
Rules
6 132×lower-*.f32
6 050×lower-*.f64
4 802×lower-/.f32
4 778×lower-/.f64
3 304×lower-fma.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01684231
02574177
110263983
086973884
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
35 → 364
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)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-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(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b 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 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #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)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))
(/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))
(/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64)))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))
(*.f64 x-scale (*.f64 #s(literal 0 binary64) a))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))))
(/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64))))
(*.f64 y-scale (PI.f64))
(/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #s(literal 90 binary64)))
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64)))))))))))))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
#s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
Outputs
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (sqrt.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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (cbrt.f64 (PI.f64))))
(*.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)))
(/.f64 (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(/.f64 (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(/.f64 (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) #s(literal 1 binary64)) (PI.f64))
(/.f64 (*.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) #s(literal 180 binary64)) (neg.f64 (PI.f64)))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #s(literal 180 binary64)) (PI.f64))
(/.f64 (*.f64 #s(literal 180 binary64) (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))))) (neg.f64 (PI.f64)))
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))))) (neg.f64 (PI.f64)))
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (PI.f64))))
(*.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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (/.f64 #s(literal 1 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) #s(literal -1 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(/.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #s(literal 1 binary64)) (PI.f64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #s(literal 1 binary64)) (PI.f64))
(/.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(/.f64 (neg.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))))) (neg.f64 (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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (neg.f64 (PI.f64)))
(/.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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64))
(neg.f64 (/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (PI.f64)))
(neg.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (neg.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(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (cbrt.f64 (PI.f64))))
(*.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))))) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (PI.f64)))
(/.f64 (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(/.f64 (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))))) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(/.f64 (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))))) #s(literal 1 binary64)) (PI.f64))
(/.f64 (*.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))))) #s(literal 180 binary64)) (neg.f64 (PI.f64)))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (PI.f64))
(/.f64 (*.f64 #s(literal 180 binary64) (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))))) (neg.f64 (PI.f64)))
(/.f64 (neg.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))))) (neg.f64 (PI.f64)))
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))))))
(*.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (PI.f64))))
(*.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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (/.f64 #s(literal 1 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))))) #s(literal -1 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(/.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) #s(literal 1 binary64)) (PI.f64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) #s(literal 1 binary64)) (PI.f64))
(/.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(/.f64 (neg.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))))) (neg.f64 (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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))))))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))))) (neg.f64 (PI.f64)))
(/.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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #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) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (PI.f64))
(neg.f64 (/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))))) (PI.f64)))
(neg.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (neg.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(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64)))) (sqrt.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 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64)))) (cbrt.f64 (PI.f64))))
(*.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64)))) (*.f64 (/.f64 #s(literal 1 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64)))) (PI.f64)))
(/.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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(/.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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64))))) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(/.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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64))))) #s(literal 1 binary64)) (PI.f64))
(/.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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64))))) #s(literal 180 binary64)) (neg.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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64)))) #s(literal 180 binary64)) (PI.f64))
(/.f64 (*.f64 #s(literal 180 binary64) (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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64)))))) (neg.f64 (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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (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)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (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)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 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 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64))))))
(*.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (PI.f64))))
(*.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 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64)))) (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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64)))) (/.f64 #s(literal 1 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 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64))))) #s(literal -1 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 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64)))) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64)))) #s(literal 1 binary64)) (PI.f64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64)))) #s(literal 1 binary64)) (PI.f64))
(/.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64)))) (sqrt.f64 (PI.f64))) (sqrt.f64 (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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64)))))) (neg.f64 (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 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64)))))))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64))))) (neg.f64 (PI.f64)))
(/.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 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 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 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (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)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64)))) (PI.f64))
(neg.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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64))))) (PI.f64)))
(neg.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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64)))) (neg.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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))) #s(literal 90 binary64)))
#s(literal 0 binary64)
#s(literal 0 binary64)
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) b) (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) b)) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))))))
(*.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))) #s(literal 0 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) b) (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) b)) #s(literal 4 binary64)) #s(literal 0 binary64)) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))) #s(literal 0 binary64)))
(/.f64 (fma.f64 (pow.f64 (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) b) #s(literal 3 binary64)) #s(literal 8 binary64) #s(literal 0 binary64)) (fma.f64 (*.f64 (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) b) (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) b)) #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) b) (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) b)) #s(literal 4 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))))))
(/.f64 (neg.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))) #s(literal 0 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) b) (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) b)) #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))))))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))) #s(literal 0 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) b) (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) b)) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))) #s(literal 0 binary64)))) (+.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))) #s(literal 3 binary64)))))
(fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))) b #s(literal 0 binary64))
(fma.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) #s(literal 0 binary64))
(fma.f64 (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) b) #s(literal 2 binary64) #s(literal 0 binary64))
(fma.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) (*.f64 b #s(literal 2 binary64)) #s(literal 0 binary64))
(fma.f64 #s(literal -2 binary64) #s(literal 0 binary64) (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))))
(fma.f64 b (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64))
(fma.f64 #s(literal 2 binary64) (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) b) #s(literal 0 binary64))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))))) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) b) (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) b)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))))))
(+.f64 (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (*.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64)))))
#s(literal 0 binary64)
(*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.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 b b) (*.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 a a))) #s(literal 2 binary64)) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))) (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (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 (fma.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 b b) (*.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 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))
(*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (/.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))) (/.f64 #s(literal -1/2 binary64) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) x-scale) (/.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))
(*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))))
(*.f64 (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))
(*.f64 (/.f64 (*.f64 (fma.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 b b) (*.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 a a))) #s(literal 2 binary64)) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))
(*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (fma.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 b b) (*.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 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) #s(literal -1/2 binary64)) (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) #s(literal -1/2 binary64)) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a)))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) #s(literal -1/2 binary64)) x-scale) (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a)))
(/.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.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 b b) (*.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 a a))) y-scale)) #s(literal -1/2 binary64)) (*.f64 (neg.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))))
(/.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a)))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (fma.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 b b) (*.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 a a))) y-scale))) (*.f64 (neg.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a))))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) #s(literal -1/2 binary64))) (*.f64 (neg.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))))
(/.f64 (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) #s(literal -1/2 binary64))))
(/.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a))))))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))) (sqrt.f64 (PI.f64))))
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))) (cbrt.f64 (PI.f64))))
(*.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))) (*.f64 (/.f64 #s(literal 1 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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))) (PI.f64)))
(/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) #s(literal 1 binary64)) (PI.f64))
(/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) #s(literal 180 binary64)) (neg.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) (PI.f64))
(/.f64 (*.f64 #s(literal 180 binary64) (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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))))) (neg.f64 (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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))))) (neg.f64 (PI.f64)))
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #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 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))))
(*.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (PI.f64))))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) #s(literal -1 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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (PI.f64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (PI.f64))
(/.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))) (sqrt.f64 (PI.f64))) (sqrt.f64 (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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))))) (neg.f64 (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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))))))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #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 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))) (PI.f64))
(/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))))
(neg.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (PI.f64)))
(neg.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))) (neg.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))
#s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.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/2 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1/2 binary64)))
(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)))
(exp.f64 (*.f64 (log.f64 (cos.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/2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1/2 binary64)))
(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)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #s(literal 1 binary64)))
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(*.f64 (/.f64 x-scale angle) (/.f64 #s(literal 1 binary64) (*.f64 (PI.f64) y-scale)))
(*.f64 (neg.f64 x-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle y-scale) (neg.f64 (PI.f64)))))
(*.f64 #s(literal 1 binary64) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)))
(*.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)))
(pow.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1 binary64))
(/.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)) y-scale)
(/.f64 (/.f64 (/.f64 x-scale angle) y-scale) (PI.f64))
(/.f64 (/.f64 x-scale (*.f64 angle y-scale)) (PI.f64))
(/.f64 (/.f64 x-scale (*.f64 (PI.f64) y-scale)) angle)
(/.f64 (neg.f64 (/.f64 x-scale angle)) (neg.f64 (*.f64 (PI.f64) y-scale)))
(/.f64 (neg.f64 (neg.f64 x-scale)) (neg.f64 (*.f64 (*.f64 angle y-scale) (neg.f64 (PI.f64)))))
(/.f64 (*.f64 x-scale #s(literal 1 binary64)) (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))
(/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale))
(/.f64 (neg.f64 x-scale) (*.f64 (*.f64 angle y-scale) (neg.f64 (PI.f64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (PI.f64) y-scale) (/.f64 x-scale angle)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(neg.f64 (/.f64 (neg.f64 x-scale) (*.f64 (*.f64 (PI.f64) y-scale) angle)))
(neg.f64 (/.f64 x-scale (*.f64 (*.f64 angle y-scale) (neg.f64 (PI.f64)))))
(*.f64 (*.f64 y-scale (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(*.f64 (*.f64 y-scale (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (*.f64 y-scale #s(literal 1 binary64)) (PI.f64))
(*.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) y-scale))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) y-scale))
(*.f64 #s(literal 1 binary64) (*.f64 (PI.f64) y-scale))
(*.f64 (PI.f64) y-scale)
(*.f64 y-scale (PI.f64))
(*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (PI.f64) angle)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 b a) (+.f64 b a))))
(*.f64 (neg.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (PI.f64) angle)) (*.f64 (-.f64 b a) (+.f64 b a)))))
(*.f64 #s(literal 1 binary64) (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))))
(*.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))))
(pow.f64 (/.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)) #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a)))) #s(literal -1 binary64))
(/.f64 (/.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (PI.f64) angle)) (-.f64 b a)) (+.f64 b a))
(/.f64 (/.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (PI.f64) angle)) (+.f64 b a)) (-.f64 b a))
(/.f64 (*.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) #s(literal 1 binary64)) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))
(/.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (-.f64 b a))
(/.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 (PI.f64) angle))
(/.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (PI.f64)) (*.f64 (*.f64 angle (-.f64 b a)) (+.f64 b a)))
(/.f64 (neg.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (PI.f64) angle))) (neg.f64 (*.f64 (-.f64 b a) (+.f64 b a))))
(/.f64 (neg.f64 (neg.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))))) (neg.f64 (*.f64 (neg.f64 (*.f64 (PI.f64) angle)) (*.f64 (-.f64 b a) (+.f64 b a)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)) #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))))))
(/.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (PI.f64) angle)) (*.f64 (-.f64 b a) (+.f64 b a)))
(/.f64 (neg.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a)))) (*.f64 (neg.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 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (PI.f64) angle))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)) #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)) #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a)))))
(/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))
(neg.f64 (/.f64 (neg.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle))))
(neg.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (neg.f64 (*.f64 (PI.f64) angle)) (*.f64 (-.f64 b a) (+.f64 b a)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) a) a)
(*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))))
(*.f64 a (*.f64 a (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale))) (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 a a) x-scale))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) x-scale) (*.f64 #s(literal 2 binary64) x-scale)) (*.f64 y-scale y-scale))) (*.f64 a a)) (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal -2 binary64) (/.f64 x-scale y-scale))))
(/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale))) (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 a a) x-scale))) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) x-scale) (*.f64 #s(literal 2 binary64) x-scale)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 a a)) (fma.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))) #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) (-.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))))))
(/.f64 (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale))) (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 a a) x-scale))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) x-scale) (*.f64 #s(literal 2 binary64) x-scale)) (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal -2 binary64) (/.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 a a) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale))) (*.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 a a) x-scale))) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) x-scale) (*.f64 #s(literal 2 binary64) x-scale)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))))) (fma.f64 (*.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))) #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) (-.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 a a)) (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 a a))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) a) a) (*.f64 (*.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) a) a))) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 a a)) (*.f64 (*.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) a) a)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))) (*.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))))) (*.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal 2 binary64)) (/.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 a a) #s(literal 2 binary64)) (/.f64 x-scale y-scale)))) (-.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))) (*.f64 (*.f64 (*.f64 a a) #s(literal 2 binary64)) (/.f64 x-scale y-scale))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 a a)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) a) a) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 a a)) (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 a a)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) a) a) (*.f64 (*.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) a) a)) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 a a)) (*.f64 (*.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) a) a)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal 2 binary64)) (/.f64 x-scale y-scale)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))) (*.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal 2 binary64)) (/.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 a a) #s(literal 2 binary64)) (/.f64 x-scale y-scale))) (*.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))) (*.f64 (*.f64 (*.f64 a a) #s(literal 2 binary64)) (/.f64 x-scale y-scale))))))
(fma.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) #s(literal 2 binary64)) (/.f64 x-scale y-scale)))
(fma.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 (*.f64 (*.f64 a a) #s(literal 2 binary64)) (/.f64 x-scale y-scale)))
(fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale y-scale)) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))))
(fma.f64 (*.f64 (*.f64 a a) #s(literal 2 binary64)) (/.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) a) a (*.f64 (*.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) a) a))
(fma.f64 (*.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) a) a (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 a a)))
(fma.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 a a) (*.f64 (*.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) a) a))
(fma.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 a a)))
(fma.f64 (/.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 a a)))
(fma.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 #s(literal -2 binary64) (*.f64 a a)) (*.f64 (*.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) a) a))
(fma.f64 (*.f64 a a) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 (*.f64 (*.f64 a a) #s(literal 2 binary64)) (/.f64 x-scale y-scale)))
(fma.f64 (*.f64 a a) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))))
(fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 a a)) (*.f64 (*.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) a) a))
(fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 x-scale y-scale) (*.f64 a a)) (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 a a)))
(fma.f64 a (*.f64 a (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))) (*.f64 (*.f64 (*.f64 a a) #s(literal 2 binary64)) (/.f64 x-scale y-scale)))
(fma.f64 a (*.f64 a (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))))
(+.f64 (*.f64 (*.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) a) a) (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 a a)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))) (*.f64 a a)) (*.f64 (*.f64 (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64)) a) a))
(+.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal 2 binary64)) (/.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))))
(+.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))) (*.f64 (*.f64 (*.f64 a a) #s(literal 2 binary64)) (/.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 b b) a) (/.f64 y-scale (*.f64 a x-scale)))
(*.f64 (/.f64 y-scale a) (/.f64 (*.f64 b b) (*.f64 a x-scale)))
(*.f64 (/.f64 b (*.f64 a a)) (/.f64 (*.f64 b y-scale) x-scale))
(*.f64 (/.f64 b a) (/.f64 (*.f64 b y-scale) (*.f64 a x-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 a a)) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 y-scale (*.f64 a a)) (/.f64 (*.f64 b b) x-scale))
(*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 y-scale (*.f64 a a)))
(*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (/.f64 y-scale x-scale))
(*.f64 (/.f64 y-scale x-scale) (/.f64 (*.f64 b b) (*.f64 a a)))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 b y-scale) (*.f64 a a)))
(*.f64 (*.f64 (neg.f64 b) (*.f64 b y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 a) (*.f64 a x-scale))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))))
(*.f64 (*.f64 (*.f64 b b) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) x-scale)))
(*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))
(*.f64 y-scale (*.f64 (*.f64 b b) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) x-scale))))
(*.f64 b (*.f64 (*.f64 b y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) x-scale))))
(*.f64 b (*.f64 b (/.f64 y-scale (*.f64 (*.f64 a a) x-scale))))
(pow.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) y-scale)) #s(literal -1 binary64))
(/.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) a) (*.f64 a x-scale))
(/.f64 (*.f64 (*.f64 b b) (/.f64 y-scale x-scale)) (*.f64 a a))
(/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 a a)) y-scale) x-scale)
(/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal 1 binary64)) (*.f64 (*.f64 a a) x-scale))
(/.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale) (*.f64 a a))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 a a))) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 (neg.f64 b) (*.f64 b y-scale))) (neg.f64 (*.f64 (neg.f64 a) (*.f64 a x-scale))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) y-scale))))
(/.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 a a)) x-scale)
(/.f64 (*.f64 (neg.f64 b) (*.f64 b y-scale)) (*.f64 (neg.f64 a) (*.f64 a x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 a a))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) y-scale)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 b b) y-scale)))
(/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale))
(neg.f64 (/.f64 (*.f64 (neg.f64 b) (*.f64 b y-scale)) (*.f64 (*.f64 a a) x-scale)))
(neg.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (neg.f64 a) (*.f64 a x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) #s(literal 0 binary64)) b (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))) #s(literal 90 binary64)))
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) x-scale) (PI.f64))) (-.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)) y-scale)) #s(literal 0 binary64))) #s(literal 0 binary64)) b (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))
(*.f64 (/.f64 (*.f64 (fma.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 b b) (*.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 a a))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 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 y-scale (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (/.f64 (*.f64 (fma.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 b b) (*.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 a a))) #s(literal 2 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 y-scale (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (/.f64 (*.f64 (fma.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 b b) (*.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 a a))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (/.f64 (*.f64 (fma.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 b b) (*.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 a a))) y-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (/.f64 (*.f64 (fma.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 b b) (*.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 a a))) y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))))
(*.f64 (/.f64 (*.f64 (fma.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 b b) (*.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 a a))) #s(literal 2 binary64)) x-scale) (/.f64 y-scale (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))
(*.f64 (/.f64 (*.f64 (fma.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 b b) (*.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 a a))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))) (/.f64 y-scale (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))) (/.f64 (*.f64 (fma.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 b b) (*.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 a a))) y-scale) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))
(*.f64 (/.f64 #s(literal 2 binary64) x-scale) (/.f64 (*.f64 (fma.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 b b) (*.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 a a))) y-scale) (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))
(*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))))
(*.f64 (/.f64 y-scale x-scale) (/.f64 (*.f64 (fma.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 b b) (*.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 a a))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))) (/.f64 (*.f64 (fma.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 b b) (*.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 a a))) #s(literal 2 binary64)) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))
(*.f64 (/.f64 (*.f64 (fma.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 b b) (*.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 a a))) #s(literal 2 binary64)) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))))
(*.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.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 b b) (*.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 a a))) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a)))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))
(*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))
(*.f64 (*.f64 (fma.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 b b) (*.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 a a))) #s(literal 2 binary64)) (/.f64 y-scale (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))
(*.f64 (fma.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 b b) (*.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 a a))) (*.f64 #s(literal 2 binary64) (/.f64 y-scale (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))))
(*.f64 y-scale (*.f64 (*.f64 (fma.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 b b) (*.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 a a))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (fma.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 b b) (*.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 a a))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))))
(*.f64 #s(literal 2 binary64) (*.f64 (fma.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 b b) (*.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 a a))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))))
(pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a))))) #s(literal -1 binary64))
(/.f64 (/.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))
(/.f64 (/.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (+.f64 b a)) (*.f64 (-.f64 b a) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(/.f64 (*.f64 (*.f64 (fma.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 b b) (*.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 a a))) #s(literal 2 binary64)) (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a)))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))
(/.f64 (*.f64 (/.f64 (*.f64 (fma.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 b b) (*.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 a a))) #s(literal 2 binary64)) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a)))
(/.f64 (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))
(/.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))
(/.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) x-scale) (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))))
(/.f64 (neg.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.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 b b) (*.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 a a))) y-scale))) (neg.f64 (*.f64 (neg.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))))))
(/.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a)))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.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 b b) (*.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 a a))) y-scale)) (*.f64 (neg.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a)) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))) (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a))))))
(/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))
(neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.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 b b) (*.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 a a))) y-scale)) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))
(neg.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (neg.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a)))))
#s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1/2 binary64)))
(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)))
(exp.f64 (*.f64 (log.f64 (cos.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/2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1/2 binary64)))
(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)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #s(literal 1 binary64)))

eval884.0ms (0.6%)

Memory
25.9MiB live, 1 357.8MiB allocated
Compiler

Compiled 388 715 to 4 356 computations (98.9% saved)

prune56.3s (37.6%)

Memory
202.0MiB live, 153 666.6MiB allocated
Pruning

85 alts after pruning (84 fresh and 1 done)

PrunedKeptTotal
New2 175462 221
Fresh93847
Picked415
Done000
Total2 188852 273
Accuracy
86.9%
Counts
2 273 → 85
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶27.5%
(/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
49.2%
(/.f64 (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
49.5%
(/.f64 (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
27.8%
(/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) (PI.f64))
14.8%
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (PI.f64))
49.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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #s(literal 180 binary64)) (PI.f64))
27.8%
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) (PI.f64))
14.8%
(/.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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))))))
49.1%
(/.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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))))
27.8%
(*.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64))
▶49.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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
▶14.6%
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
49.2%
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (sqrt.f64 (PI.f64))))
49.0%
(*.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (cbrt.f64 (PI.f64))))
3.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 -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) (/.f64 #s(literal 1 binary64) (PI.f64)))
14.8%
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
▶49.6%
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
12.2%
(*.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 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale 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))) (PI.f64)))
12.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 y-scale x-scale))) (PI.f64)))
11.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 y-scale x-scale))) (PI.f64)))
22.6%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 y-scale x-scale))) (PI.f64)))
31.5%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))) (PI.f64)))
15.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 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (PI.f64) angle)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
14.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 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (-.f64 b a)) #s(literal 90 binary64)))) (PI.f64)))
15.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 (*.f64 (*.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) y-scale) x-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
26.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 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64)))) (PI.f64)))
29.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 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal -1/2 binary64)))) (PI.f64)))
27.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 #s(approx (sin (* (* (PI) angle) 1/180)) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)))
29.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 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) #s(approx (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64)))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)))
30.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 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)))
30.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 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)))
15.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) y-scale))) x-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
11.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (*.f64 b (*.f64 b (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
15.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
2.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(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
28.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 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 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(approx (* (* a a) (+ (* -2 (/ (* (* b b) y-scale) (* (* a a) x-scale))) (* 2 (/ x-scale y-scale)))) (*.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -2 binary64))) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
26.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (fma.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 b b) (*.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 a a))) (*.f64 #s(literal 2 binary64) (/.f64 y-scale (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/2 binary64)))) (PI.f64)))
26.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 (*.f64 (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal -1/2 binary64)))) (PI.f64)))
29.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 (*.f64 (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)))) #s(literal -1/2 binary64)))) (PI.f64)))
22.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 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (/.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) (-.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
22.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (-.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
30.5%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)))) #s(literal -1/2 binary64)))) (PI.f64)))
14.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))) #s(literal 90 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 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) #s(approx (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64)))))))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)))
7.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 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)))
13.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 #s(approx (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (*.f64 #s(literal -2 binary64) (*.f64 b b))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)))
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 (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (-.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))) #s(literal -1/2 binary64)))) (PI.f64)))
14.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
13.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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(literal -1/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 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (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 (*.f64 b b) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) #s(literal -1/2 binary64)))) (PI.f64)))
11.1%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.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 3 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) #s(literal -1/2 binary64)))) (PI.f64)))
14.4%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))) #s(literal -1/2 binary64)))) (PI.f64)))
7.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (fma.f64 (/.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)))) y-scale))))) #s(literal 90 binary64)))) (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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))))))) #s(literal 90 binary64)))) (PI.f64)))
21.6%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))))) #s(literal 90 binary64)))) (PI.f64)))
13.5%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 a a))) #s(literal 2 binary64)))))) #s(literal 90 binary64)))) (PI.f64)))
12.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)) #s(literal 90 binary64)))) (PI.f64)))
28.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 90 binary64)))) (PI.f64)))
2.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 90 binary64)))) (PI.f64)))
▶38.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
12.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 b b) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) #s(literal 90 binary64)))) (PI.f64)))
2.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) #s(literal 90 binary64)))) (PI.f64)))
14.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)) y-scale))) #s(literal 90 binary64)))) (PI.f64)))
14.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 x-scale (*.f64 (PI.f64) y-scale)) angle))) #s(literal 90 binary64)))) (PI.f64)))
14.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))) #s(literal 90 binary64)))) (PI.f64)))
28.6%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) #s(literal 90 binary64)))) (PI.f64)))
14.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (neg.f64 x-scale) (*.f64 (*.f64 angle y-scale) (neg.f64 (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)))
14.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 (*.f64 y-scale (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))))))) #s(literal 90 binary64)))) (PI.f64)))
✓14.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)))
14.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (PI.f64) y-scale) (/.f64 x-scale angle))))) #s(literal 90 binary64)))) (PI.f64)))
14.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 x-scale angle) (/.f64 #s(literal 1 binary64) (*.f64 (PI.f64) y-scale))))) #s(literal 90 binary64)))) (PI.f64)))
14.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 (neg.f64 x-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle y-scale) (neg.f64 (PI.f64))))))) #s(literal 90 binary64)))) (PI.f64)))
14.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) #s(literal 90 binary64)))) (PI.f64)))
45.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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
23.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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
48.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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)))))) #s(literal -1/2 binary64)))) (PI.f64)))
45.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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
46.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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
28.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 (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (/.f64 (*.f64 #s(literal -180 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))) (PI.f64)))
44.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (*.f64 (neg.f64 y-scale) (/.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))) x-scale)))))) (PI.f64)))
14.8%
(*.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(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))))))
49.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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))))))
27.8%
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (/.f64 #s(literal 1 binary64) (PI.f64))))
49.5%
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (/.f64 #s(literal 1 binary64) (PI.f64))))
Compiler

Compiled 9 753 to 4 931 computations (49.4% saved)

simplify144.0ms (0.1%)

Memory
2.9MiB live, 318.4MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff128
(+.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))))))
cost-diff320
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
cost-diff512
(*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))
cost-diff1984
(/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
cost-diff0
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
cost-diff0
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))
cost-diff0
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64))
cost-diff0
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
cost-diff0
(PI.f64)
cost-diff0
(sqrt.f64 (PI.f64))
cost-diff0
(/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64)))
cost-diff1984
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
cost-diff0
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))
cost-diff0
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))))
cost-diff0
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))
cost-diff0
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
cost-diff0
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
cost-diff0
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))
cost-diff0
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
cost-diff320
(*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))
Rules
7 112×lower-*.f32
7 050×lower-*.f64
4 388×lower-/.f32
4 366×lower-/.f64
2 216×lower-fma.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01425489
02025485
14305433
215455411
374825411
081035279
Stop Event
1×iter limit
1×node limit
1×iter limit
Calls
Call 1
Inputs
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
#s(literal -1/2 binary64)
#s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale))
#s(literal -2 binary64)
(/.f64 y-scale x-scale)
y-scale
x-scale
(tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 (PI.f64) angle)
(PI.f64)
angle
#s(literal 1/180 binary64)
(*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))
(/.f64 #s(literal 1 binary64) (PI.f64))
#s(literal 1 binary64)
#s(literal 180 binary64)
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))
(*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
y-scale
(*.f64 (*.f64 (PI.f64) x-scale) angle)
(*.f64 (PI.f64) x-scale)
(PI.f64)
x-scale
angle
#s(literal -2 binary64)
#s(literal 90 binary64)
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64)))
#s(literal 180 binary64)
(sqrt.f64 (PI.f64))
(PI.f64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.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(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))
(*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))
#s(literal 90 binary64)
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
x-scale
(*.f64 (*.f64 (PI.f64) y-scale) angle)
(*.f64 (PI.f64) y-scale)
y-scale
angle
#s(literal -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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 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) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
#s(literal -1/2 binary64)
#s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale))
#s(literal -2 binary64)
(/.f64 y-scale x-scale)
y-scale
x-scale
(tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 (PI.f64) angle)
(PI.f64)
angle
#s(literal 1/180 binary64)
#s(literal 180 binary64)
(/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64)))
(*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))))
#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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #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 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))
(/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))
(*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a))))
(*.f64 y-scale #s(literal 2 binary64))
y-scale
#s(literal 2 binary64)
(fma.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 b b) (*.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 a a)))
(+.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 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)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 (PI.f64) angle)
(PI.f64)
angle
#s(literal 1/180 binary64)
(*.f64 b b)
b
(*.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 a a))
(-.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 a a)
a
(*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))
(*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)
#s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))
#s(literal 1 binary64)
x-scale
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (-.f64 b a) (+.f64 b a))
(-.f64 b a)
(+.f64 b a)
#s(literal -1/2 binary64)
(sqrt.f64 (PI.f64))
Outputs
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))
(*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
#s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
#s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64))))
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))
(*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale))
(*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64))
#s(literal -2 binary64)
(/.f64 y-scale x-scale)
y-scale
x-scale
(tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 (PI.f64) angle)
(PI.f64)
angle
#s(literal 1/180 binary64)
(*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))
(/.f64 #s(literal 180 binary64) (PI.f64))
(/.f64 #s(literal 1 binary64) (PI.f64))
#s(literal 1 binary64)
#s(literal 180 binary64)
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))))) (/.f64 #s(literal 180 binary64) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #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)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))))
(*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))
(*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))))
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
y-scale
(*.f64 (*.f64 (PI.f64) x-scale) angle)
(*.f64 (PI.f64) x-scale)
(PI.f64)
x-scale
angle
#s(literal -2 binary64)
#s(literal 90 binary64)
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (/.f64 #s(literal 180 binary64) (PI.f64)))
(/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64)))
#s(literal 180 binary64)
(sqrt.f64 (PI.f64))
(PI.f64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (sqrt.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(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #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)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))
(*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))
(*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))
#s(literal 90 binary64)
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
x-scale
(*.f64 (*.f64 (PI.f64) y-scale) angle)
(*.f64 (PI.f64) y-scale)
y-scale
angle
#s(literal -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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))
(*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))
(*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
#s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
#s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64))))
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(*.f64 (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))
(*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale))
(*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64))
#s(literal -2 binary64)
(/.f64 y-scale x-scale)
y-scale
x-scale
(tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 (PI.f64) angle)
(PI.f64)
angle
#s(literal 1/180 binary64)
#s(literal 180 binary64)
(/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.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 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (/.f64 (neg.f64 y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))))) (/.f64 #s(literal 180 binary64) (PI.f64)))
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.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 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (/.f64 (neg.f64 y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))))) (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))))
(*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (/.f64 (neg.f64 y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))))) #s(literal 180 binary64))
#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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (/.f64 (neg.f64 y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #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 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (/.f64 (neg.f64 y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))
(*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (/.f64 (neg.f64 y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a)))))
(/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))
(*.f64 (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a)))) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))))
(*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a))))
(*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))) (*.f64 y-scale #s(literal 2 binary64)))
(*.f64 y-scale #s(literal 2 binary64))
y-scale
#s(literal 2 binary64)
(fma.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 b b) (*.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 a a)))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a)))
(+.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))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
#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 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(*.f64 (PI.f64) angle)
(PI.f64)
angle
#s(literal 1/180 binary64)
(*.f64 b b)
b
(*.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 a a))
(*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 a a))
(-.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))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(*.f64 a a)
a
(*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))
(*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (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 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))
(*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)
#s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))
#s(literal 1 binary64)
x-scale
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (-.f64 b a) (+.f64 b a))
(*.f64 (+.f64 b a) (-.f64 b a))
(-.f64 b a)
(+.f64 b a)
#s(literal -1/2 binary64)
(sqrt.f64 (PI.f64))

localize1.1s (0.7%)

Memory
-13.1MiB live, 3 342.9MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy18.74361136081105
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
accuracy19.233132198223522
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
accuracy20.33642838732166
#s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))
accuracy29.38387529476738
(/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))
accuracy4.252595971791949
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
accuracy8.665851001494705
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
accuracy19.272389395835045
(tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
accuracy37.585031056104405
#s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
accuracy1.0
(sqrt.f64 (PI.f64))
accuracy5.127683699621976
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
accuracy36.223321704095746
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
accuracy44.656231019891365
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))
accuracy0.30859375
(*.f64 (PI.f64) x-scale)
accuracy6.911590288096063
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
accuracy40.474419517116715
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
accuracy44.656231019891365
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))
accuracy4.252595971791949
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
accuracy8.665851001494705
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
accuracy19.272389395835045
(tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
accuracy37.585031056104405
#s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
Samples
314.0ms136×1valid
291.0ms107×2valid
26.0ms6×3valid
8.0ms7×0valid
Compiler

Compiled 4 215 to 125 computations (97% saved)

Precisions
Click to see histograms. Total time spent on operations: 538.0ms
ival-mult: 171.0ms (31.8% of total)
ival-div: 77.0ms (14.3% of total)
ival-cos: 73.0ms (13.6% of total)
adjust: 51.0ms (9.5% of total)
ival-pow2: 50.0ms (9.3% of total)
ival-sin: 43.0ms (8% of total)
ival-add: 18.0ms (3.3% of total)
ival-sub: 17.0ms (3.2% of total)
const: 12.0ms (2.2% of total)
ival-sqrt: 9.0ms (1.7% of total)
ival-tan: 8.0ms (1.5% of total)
ival-atan: 4.0ms (0.7% of total)
ival-pi: 3.0ms (0.6% of total)
exact: 1.0ms (0.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series579.0ms (0.4%)

Memory
9.9MiB live, 1 796.3MiB allocated
Counts
31 → 1 212
Calls
Call 1
Inputs
#s(alt (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())
#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())
#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())
#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())
#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (patch (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (PI.f64)) (patch (sqrt.f64 (PI.f64)) #<representation binary64>) () ())
#s(alt (PI.f64) (patch (PI.f64) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())
#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())
#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())
#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())
#s(alt (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())
#s(alt (*.f64 (PI.f64) x-scale) (patch (*.f64 (PI.f64) x-scale) #<representation binary64>) () ())
#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())
#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())
#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())
Outputs
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 b) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* b (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* b (+ (* -1 (* b (- (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (pow (+ a (* -1 a)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (/ (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* b (+ (* b (+ (* -1 (- (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (pow (+ a (* -1 a)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (pow (+ a (* -1 a)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow a 2))) (/ (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (/ (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* b (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (* b (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* 2 (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI))))))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ x-scale (* angle (* y-scale (PI))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* b (* x-scale (+ a (* -1 a)))) (* (pow a 2) (* angle (* y-scale (PI))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))) (pow a 2))) (/ (* x-scale (+ a (* -1 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))) (* 2 (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI))))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))))))) (taylor 0 b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ x-scale (* angle (* y-scale (PI))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* b (* x-scale (+ a (* -1 a)))) (* (pow a 2) (* angle (* y-scale (PI))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))) (pow a 2))) (/ (* x-scale (+ a (* -1 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))) (* 2 (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI))))))))))))) (taylor 0 b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* b (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* b (+ (* -2 (/ (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 2 (* b (- (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (pow (+ a (* -1 a)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* b (+ (* -2 (/ (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (pow (+ a (* -1 a)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow a 2))) (/ (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 2 (- (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (pow (+ a (* -1 a)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf b) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor inf b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor inf b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (- (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (taylor inf b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (- (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 3)) (/ (* (pow a 2) (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a))))) (* (pow b 3) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (taylor inf b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (taylor inf b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor inf b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))) (taylor inf b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (taylor inf b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ y-scale (* angle (* x-scale (PI))))) (taylor inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI))))))) (taylor inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))) (taylor inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* -2 (/ (+ (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI))))) (* (+ a (* -1 a)) (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))) (taylor inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ y-scale (* angle (* x-scale (PI))))) (taylor inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI))))))) (taylor inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))) (taylor inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* -2 (/ (+ (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI))))) (* (+ a (* -1 a)) (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))) (taylor inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -2 (/ (+ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* (pow a 2) (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf b) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf b) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf b) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) b)) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) b))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) b)) (+ (* -1 (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow a 2) (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a))))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) b)) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) b))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (taylor -inf b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor -inf b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor -inf b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) b))) b)) (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor -inf b) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ y-scale (* angle (* x-scale (PI))))) (taylor -inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI))))))) (taylor -inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) b))) b))) (taylor -inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI)))))) b))) b))) b))) (taylor -inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))) (taylor -inf b) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ y-scale (* angle (* x-scale (PI))))) (taylor -inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI))))))) (taylor -inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) b))) b))) (taylor -inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI)))))) b))) b))) b))) (taylor -inf b) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* 2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) b))) b)) (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* (pow a 2) (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) b))) b)) (* 2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) b)) (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 a) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* a (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -1 (* a (- (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* a (+ (* -1 (- (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (* a (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 2)))))) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* a (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (* a (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -2 (* a (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (pow b 2))))) (* 2 (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ y-scale (* angle (* x-scale (PI))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* a (* y-scale (+ b (* -1 b)))) (* angle (* (pow b 2) (* x-scale (PI))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (* a (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))) (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI))))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))) (* a (+ (* -2 (* a (+ (* -1 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 4) (* x-scale (PI)))))) (/ (* (+ b (* -1 b)) (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))) (pow b 2))))) (* 2 (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))))))) (taylor 0 a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ y-scale (* angle (* x-scale (PI))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* a (* y-scale (+ b (* -1 b)))) (* angle (* (pow b 2) (* x-scale (PI))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (* a (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))) (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI))))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))) (* a (+ (* -2 (* a (+ (* -1 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 4) (* x-scale (PI)))))) (/ (* (+ b (* -1 b)) (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))) (pow b 2))))) (* 2 (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))))))) (taylor 0 a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* a (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 2 (* a (- (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* a (+ (* -2 (* a (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 2))))) (* 2 (- (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf a) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor inf a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))) (+ (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor inf a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 3))) (+ (* -1 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))) (+ (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 3) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (taylor inf a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor inf a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))))) (taylor inf a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))))) (taylor inf a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (pow a 3))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (taylor inf a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ x-scale (* angle (* y-scale (PI))))) (taylor inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI))))))) (taylor inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))) (taylor inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) (pow a 3))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))) (taylor inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ x-scale (* angle (* y-scale (PI))))) (taylor inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI))))))) (taylor inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))) (taylor inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) (pow a 3))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))) (taylor inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* (pow b 2) (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 3))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf a) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf a) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf a) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (+ (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) a)) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* -1 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* (pow b 2) (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) a))) a)) (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) a)) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* 2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI))))))))) (taylor -inf a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a))) a))) (taylor -inf a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* 2 (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) a))) a))) a))) (taylor -inf a) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ x-scale (* angle (* y-scale (PI))))) (taylor -inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI))))))) (taylor -inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) a))) a))) (taylor -inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -1 (/ (+ (* 2 (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) a))) a))) a))) (taylor -inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2)))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))) (taylor -inf a) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ x-scale (* angle (* y-scale (PI))))) (taylor -inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI))))))) (taylor -inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) a))) a))) (taylor -inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -1 (/ (+ (* 2 (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) a))) a))) a))) (taylor -inf a) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) a))) a))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (+ (* 2 (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* (pow b 2) (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) a))) a))) a))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 angle) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -180 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* -1 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) angle) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* -1 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* -1 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* -1 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/3149280000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/180 (* angle (PI))) (taylor 0 angle) (#s(alt (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3)))))) (taylor 0 angle) (#s(alt (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (- (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (- (* 1/22674816000000 (pow (PI) 5)) (+ (* -1/64800 (* (pow (PI) 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) (* 1/4534963200000 (pow (PI) 5)))))) (* -1/11664000 (pow (PI) 3)))))) (taylor 0 angle) (#s(alt (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (- (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (- (+ (* 1/22674816000000 (pow (PI) 5)) (* (pow angle 2) (- (* -1/30855889612800000000 (pow (PI) 7)) (+ (* -1/64800 (* (pow (PI) 2) (- (* 1/22674816000000 (pow (PI) 5)) (+ (* -1/64800 (* (pow (PI) 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) (* 1/4534963200000 (pow (PI) 5)))))) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* 1/25194240000 (* (pow (PI) 4) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3)))))))))) (+ (* -1/64800 (* (pow (PI) 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) (* 1/4534963200000 (pow (PI) 5)))))) (* -1/11664000 (pow (PI) 3)))))) (taylor 0 angle) (#s(alt (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/90 (/ (* angle (* y-scale (PI))) x-scale)) (taylor 0 angle) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* -2 (/ (* (pow angle 2) (* y-scale (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) x-scale)) (* -1/90 (/ (* y-scale (PI)) x-scale)))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* -1/90 (/ (* y-scale (PI)) x-scale)) (* (pow angle 2) (+ (* -2 (/ (* y-scale (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3)))) x-scale)) (* -2 (/ (* (pow angle 2) (* y-scale (- (* 1/22674816000000 (pow (PI) 5)) (+ (* -1/64800 (* (pow (PI) 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) (* 1/4534963200000 (pow (PI) 5)))))) x-scale)))))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* -1/90 (/ (* y-scale (PI)) x-scale)) (* (pow angle 2) (+ (* -2 (/ (* y-scale (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3)))) x-scale)) (* (pow angle 2) (+ (* -2 (/ (* y-scale (- (* 1/22674816000000 (pow (PI) 5)) (+ (* -1/64800 (* (pow (PI) 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) (* 1/4534963200000 (pow (PI) 5))))) x-scale)) (* -2 (/ (* (pow angle 2) (* y-scale (- (* -1/30855889612800000000 (pow (PI) 7)) (+ (* -1/64800 (* (pow (PI) 2) (- (* 1/22674816000000 (pow (PI) 5)) (+ (* -1/64800 (* (pow (PI) 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) (* 1/4534963200000 (pow (PI) 5)))))) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* 1/25194240000 (* (pow (PI) 4) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3)))))))))) x-scale)))))))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor 0 angle) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor 0 angle) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor 0 angle) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor 0 angle) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle) (taylor 0 angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor 0 angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 angle) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 angle) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 angle) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 angle) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a))))))) angle) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle) (taylor 0 angle) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/180 (* angle (PI))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4)))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4))))))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf angle) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI))))) (taylor inf angle) (#s(alt (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI))))) (taylor inf angle) (#s(alt (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI))))) (taylor inf angle) (#s(alt (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI))))) (taylor inf angle) (#s(alt (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor inf angle) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor inf angle) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor inf angle) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor inf angle) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor inf angle) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor inf angle) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor inf angle) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor inf angle) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf angle) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf angle) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf angle) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf angle) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf angle) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf angle) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf angle) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf angle) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI))))) (taylor -inf angle) (#s(alt (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI))))) (taylor -inf angle) (#s(alt (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI))))) (taylor -inf angle) (#s(alt (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI))))) (taylor -inf angle) (#s(alt (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor -inf angle) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor -inf angle) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor -inf angle) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor -inf angle) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf angle) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a)))))) (taylor -inf angle) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf angle) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf angle) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf angle) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf angle) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf angle) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) (patch #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (patch (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 x-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor 0 x-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor 0 x-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor 0 x-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor 0 x-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (PI)) (taylor 0 x-scale) (#s(alt (*.f64 (PI.f64) x-scale) (patch (*.f64 (PI.f64) x-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (PI)) (taylor 0 x-scale) (#s(alt (*.f64 (PI.f64) x-scale) (patch (*.f64 (PI.f64) x-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (PI)) (taylor 0 x-scale) (#s(alt (*.f64 (PI.f64) x-scale) (patch (*.f64 (PI.f64) x-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (PI)) (taylor 0 x-scale) (#s(alt (*.f64 (PI.f64) x-scale) (patch (*.f64 (PI.f64) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale) (taylor 0 x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 x-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 x-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 x-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 x-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf x-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor inf x-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor inf x-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor inf x-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor inf x-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (PI)) (taylor inf x-scale) (#s(alt (*.f64 (PI.f64) x-scale) (patch (*.f64 (PI.f64) x-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (PI)) (taylor inf x-scale) (#s(alt (*.f64 (PI.f64) x-scale) (patch (*.f64 (PI.f64) x-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (PI)) (taylor inf x-scale) (#s(alt (*.f64 (PI.f64) x-scale) (patch (*.f64 (PI.f64) x-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (PI)) (taylor inf x-scale) (#s(alt (*.f64 (PI.f64) x-scale) (patch (*.f64 (PI.f64) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale) (taylor inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))))) (taylor inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf x-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf x-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf x-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf x-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf x-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf x-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor -inf x-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor -inf x-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor -inf x-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor -inf x-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (PI)) (taylor -inf x-scale) (#s(alt (*.f64 (PI.f64) x-scale) (patch (*.f64 (PI.f64) x-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (PI)) (taylor -inf x-scale) (#s(alt (*.f64 (PI.f64) x-scale) (patch (*.f64 (PI.f64) x-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (PI)) (taylor -inf x-scale) (#s(alt (*.f64 (PI.f64) x-scale) (patch (*.f64 (PI.f64) x-scale) #<representation binary64>) () ())) ())
#s(alt (* x-scale (PI)) (taylor -inf x-scale) (#s(alt (*.f64 (PI.f64) x-scale) (patch (*.f64 (PI.f64) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)) (taylor -inf x-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf x-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf x-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf x-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf x-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf x-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor 0 y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor 0 y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor 0 y-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor 0 y-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor 0 y-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor 0 y-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor 0 y-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale) (taylor 0 y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 y-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 y-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 y-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor 0 y-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor inf y-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor inf y-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor inf y-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor inf y-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor inf y-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))))) (taylor inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf y-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf y-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf y-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor inf y-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (patch (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) (patch (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (taylor -inf y-scale) (#s(alt (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (patch (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) (patch (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) (patch (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)) (taylor -inf y-scale) (#s(alt (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) (patch (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))) (taylor -inf y-scale) (#s(alt (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) (patch (/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) (patch (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (patch #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (patch (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor -inf y-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor -inf y-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor -inf y-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ y-scale (* angle (* x-scale (PI)))) (taylor -inf y-scale) (#s(alt (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (patch (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) (patch #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))))) (taylor -inf y-scale) (#s(alt #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) (patch #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf y-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf y-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf y-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (/ x-scale (* angle (* y-scale (PI)))) (taylor -inf y-scale) (#s(alt (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (patch (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a))))))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) (patch (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #<representation binary64>) () ())) ())
Calls

15 calls:

TimeVariablePointExpression
18.0ms
angle
@0
((* (/ 1 (PI)) 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))) (* (/ 1 (PI)) 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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (/ 180 (sqrt (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))) (sqrt (PI)))) (/ 180 (sqrt (PI))) (sqrt (PI)) (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))) (PI)) 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)) (/ (/ (* 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)))) (sqrt (PI))) (sqrt (PI))) (* (/ (* (* y-scale 2) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* a a)))) (* (* (* (cos (* (* (PI) angle) 1/180)) x-scale) (sin (* (* (PI) angle) 1/180))) (* (- b a) (+ b a)))) -1/2) (* 2 (* (* (PI) angle) 1/180)) (+ 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (tan (* (* (PI) angle) 1/180)) (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ y-scale (* (* (PI) x-scale) angle)) (* (PI) x-scale) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ x-scale (* (* (PI) y-scale) angle)) (/ (* (* y-scale 2) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* a a)))) (* (* (* (cos (* (* (PI) angle) 1/180)) x-scale) (sin (* (* (PI) angle) 1/180))) (* (- b a) (+ b a)))) (cos (* (* (PI) angle) 1/180)) (sin (* (* (PI) angle) 1/180)) (cos (* 2 (* (* (PI) angle) 1/180))))
17.0ms
angle
@-inf
((* (/ 1 (PI)) 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))) (* (/ 1 (PI)) 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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (/ 180 (sqrt (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))) (sqrt (PI)))) (/ 180 (sqrt (PI))) (sqrt (PI)) (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))) (PI)) 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)) (/ (/ (* 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)))) (sqrt (PI))) (sqrt (PI))) (* (/ (* (* y-scale 2) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* a a)))) (* (* (* (cos (* (* (PI) angle) 1/180)) x-scale) (sin (* (* (PI) angle) 1/180))) (* (- b a) (+ b a)))) -1/2) (* 2 (* (* (PI) angle) 1/180)) (+ 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (tan (* (* (PI) angle) 1/180)) (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ y-scale (* (* (PI) x-scale) angle)) (* (PI) x-scale) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ x-scale (* (* (PI) y-scale) angle)) (/ (* (* y-scale 2) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* a a)))) (* (* (* (cos (* (* (PI) angle) 1/180)) x-scale) (sin (* (* (PI) angle) 1/180))) (* (- b a) (+ b a)))) (cos (* (* (PI) angle) 1/180)) (sin (* (* (PI) angle) 1/180)) (cos (* 2 (* (* (PI) angle) 1/180))))
16.0ms
angle
@inf
((* (/ 1 (PI)) 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))) (* (/ 1 (PI)) 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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (/ 180 (sqrt (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))) (sqrt (PI)))) (/ 180 (sqrt (PI))) (sqrt (PI)) (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))) (PI)) 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)) (/ (/ (* 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)))) (sqrt (PI))) (sqrt (PI))) (* (/ (* (* y-scale 2) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* a a)))) (* (* (* (cos (* (* (PI) angle) 1/180)) x-scale) (sin (* (* (PI) angle) 1/180))) (* (- b a) (+ b a)))) -1/2) (* 2 (* (* (PI) angle) 1/180)) (+ 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (tan (* (* (PI) angle) 1/180)) (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ y-scale (* (* (PI) x-scale) angle)) (* (PI) x-scale) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ x-scale (* (* (PI) y-scale) angle)) (/ (* (* y-scale 2) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* a a)))) (* (* (* (cos (* (* (PI) angle) 1/180)) x-scale) (sin (* (* (PI) angle) 1/180))) (* (- b a) (+ b a)))) (cos (* (* (PI) angle) 1/180)) (sin (* (* (PI) angle) 1/180)) (cos (* 2 (* (* (PI) angle) 1/180))))
15.0ms
y-scale
@0
((* (/ 1 (PI)) 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))) (* (/ 1 (PI)) 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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (/ 180 (sqrt (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))) (sqrt (PI)))) (/ 180 (sqrt (PI))) (sqrt (PI)) (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))) (PI)) 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)) (/ (/ (* 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)))) (sqrt (PI))) (sqrt (PI))) (* (/ (* (* y-scale 2) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* a a)))) (* (* (* (cos (* (* (PI) angle) 1/180)) x-scale) (sin (* (* (PI) angle) 1/180))) (* (- b a) (+ b a)))) -1/2) (* 2 (* (* (PI) angle) 1/180)) (+ 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (tan (* (* (PI) angle) 1/180)) (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ y-scale (* (* (PI) x-scale) angle)) (* (PI) x-scale) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ x-scale (* (* (PI) y-scale) angle)) (/ (* (* y-scale 2) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* a a)))) (* (* (* (cos (* (* (PI) angle) 1/180)) x-scale) (sin (* (* (PI) angle) 1/180))) (* (- b a) (+ b a)))) (cos (* (* (PI) angle) 1/180)) (sin (* (* (PI) angle) 1/180)) (cos (* 2 (* (* (PI) angle) 1/180))))
14.0ms
x-scale
@0
((* (/ 1 (PI)) 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))) (* (/ 1 (PI)) 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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 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))) (/ (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)) (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))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (/ 180 (sqrt (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))) (sqrt (PI)))) (/ 180 (sqrt (PI))) (sqrt (PI)) (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))) (PI)) 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)) (/ (/ (* 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)))) (sqrt (PI))) (sqrt (PI))) (* (/ (* (* y-scale 2) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* a a)))) (* (* (* (cos (* (* (PI) angle) 1/180)) x-scale) (sin (* (* (PI) angle) 1/180))) (* (- b a) (+ b a)))) -1/2) (* 2 (* (* (PI) angle) 1/180)) (+ 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (tan (* (* (PI) angle) 1/180)) (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ y-scale (* (* (PI) x-scale) angle)) (* (PI) x-scale) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/ x-scale (* (* (PI) y-scale) angle)) (/ (* (* y-scale 2) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* a a)))) (* (* (* (cos (* (* (PI) angle) 1/180)) x-scale) (sin (* (* (PI) angle) 1/180))) (* (- b a) (+ b a)))) (cos (* (* (PI) angle) 1/180)) (sin (* (* (PI) angle) 1/180)) (cos (* 2 (* (* (PI) angle) 1/180))))

simplify920.0ms (0.6%)

Memory
53.0MiB live, 2 666.1MiB allocated
Algorithm
1×egg-herbie
Rules
7 384×lower-*.f64
7 384×lower-*.f32
4 710×lower-fma.f64
4 710×lower-fma.f32
2 944×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01823260910
16566259956
08531253800
Stop Event
1×iter limit
1×node limit
Counts
1 212 → 1 212
Calls
Call 1
Inputs
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (/ (* b (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* b (+ (* -1 (* b (- (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (pow (+ a (* -1 a)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (/ (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* b (+ (* b (+ (* -1 (- (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (pow (+ a (* -1 a)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (pow (+ a (* -1 a)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow a 2))) (/ (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (/ (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* b (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (* b (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI))))))))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* 2 (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* b (* x-scale (+ a (* -1 a)))) (* (pow a 2) (* angle (* y-scale (PI)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI))))))))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))) (pow a 2))) (/ (* x-scale (+ a (* -1 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))) (* 2 (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* b (* x-scale (+ a (* -1 a)))) (* (pow a 2) (* angle (* y-scale (PI)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI))))))))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))) (pow a 2))) (/ (* x-scale (+ a (* -1 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))) (* 2 (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))))))))
(* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -2 (/ (* b (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* b (+ (* -2 (/ (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 2 (* b (- (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (pow (+ a (* -1 a)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
(+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* b (+ (* -2 (/ (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (pow (+ a (* -1 a)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow a 2))) (/ (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 2 (- (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (pow (+ a (* -1 a)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (- (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
(+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (- (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 3)) (/ (* (pow a 2) (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a))))) (* (pow b 3) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* -2 (/ (+ (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI))))) (* (+ a (* -1 a)) (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* -2 (/ (+ (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI))))) (* (+ a (* -1 a)) (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))
(* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* -2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))))
(+ (* -2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -2 (/ (+ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* (pow a 2) (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) b)) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) b)))
(+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) b)) (+ (* -1 (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow a 2) (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a))))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) b)) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) b)))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (+ (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) b))) b)) (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) b))) b)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI)))))) b))) b))) b)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) b))) b)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI)))))) b))) b))) b)))
(* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* -1 (/ (+ (* 2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) b))) b)) (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* (pow a 2) (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) b))) b)) (* 2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) b)) (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* a (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -1 (* a (- (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* a (+ (* -1 (- (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (* a (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 2)))))) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* a (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (* a (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))))
(+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -2 (* a (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (pow b 2))))) (* 2 (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* a (* y-scale (+ b (* -1 b)))) (* angle (* (pow b 2) (* x-scale (PI)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (* a (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))) (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))) (* a (+ (* -2 (* a (+ (* -1 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 4) (* x-scale (PI)))))) (/ (* (+ b (* -1 b)) (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))) (pow b 2))))) (* 2 (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* a (* y-scale (+ b (* -1 b)))) (* angle (* (pow b 2) (* x-scale (PI)))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (* a (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))) (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))) (* a (+ (* -2 (* a (+ (* -1 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 4) (* x-scale (PI)))))) (/ (* (+ b (* -1 b)) (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))) (pow b 2))))) (* 2 (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))))))))
(* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -2 (/ (* a (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 2 (* a (- (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))))
(+ (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* a (+ (* -2 (* a (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 2))))) (* 2 (- (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))) (+ (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* -1 (/ (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 3))) (+ (* -1 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))) (+ (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 3) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2)))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (pow a 3))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) (pow a 3))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) (pow a 3))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))
(* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -2 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(+ (* -2 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))
(+ (* -2 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* (pow b 2) (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 3))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (- (+ (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) a)) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* -1 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* (pow b 2) (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) a))) a)) (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) a)) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* 2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a))) a)))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* 2 (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) a))) a))) a)))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) a))) a)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -1 (/ (+ (* 2 (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) a))) a))) a)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) a))) a)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -1 (/ (+ (* 2 (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) a))) a))) a)))
(* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
(+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) a))) a)))
(+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (+ (* 2 (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* (pow b 2) (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) a))) a))) a)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* -180 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* -1 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) angle)
(/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* -1 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle)
(/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* -1 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* -1 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle)
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
1
(+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/3149280000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4)))))))
(* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a))))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle)
(* 1/180 (* angle (PI)))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (- (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (- (* 1/22674816000000 (pow (PI) 5)) (+ (* -1/64800 (* (pow (PI) 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) (* 1/4534963200000 (pow (PI) 5)))))) (* -1/11664000 (pow (PI) 3))))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (- (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (- (+ (* 1/22674816000000 (pow (PI) 5)) (* (pow angle 2) (- (* -1/30855889612800000000 (pow (PI) 7)) (+ (* -1/64800 (* (pow (PI) 2) (- (* 1/22674816000000 (pow (PI) 5)) (+ (* -1/64800 (* (pow (PI) 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) (* 1/4534963200000 (pow (PI) 5)))))) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* 1/25194240000 (* (pow (PI) 4) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3)))))))))) (+ (* -1/64800 (* (pow (PI) 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) (* 1/4534963200000 (pow (PI) 5)))))) (* -1/11664000 (pow (PI) 3))))))
(* -1/90 (/ (* angle (* y-scale (PI))) x-scale))
(* angle (+ (* -2 (/ (* (pow angle 2) (* y-scale (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) x-scale)) (* -1/90 (/ (* y-scale (PI)) x-scale))))
(* angle (+ (* -1/90 (/ (* y-scale (PI)) x-scale)) (* (pow angle 2) (+ (* -2 (/ (* y-scale (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3)))) x-scale)) (* -2 (/ (* (pow angle 2) (* y-scale (- (* 1/22674816000000 (pow (PI) 5)) (+ (* -1/64800 (* (pow (PI) 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) (* 1/4534963200000 (pow (PI) 5)))))) x-scale))))))
(* angle (+ (* -1/90 (/ (* y-scale (PI)) x-scale)) (* (pow angle 2) (+ (* -2 (/ (* y-scale (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3)))) x-scale)) (* (pow angle 2) (+ (* -2 (/ (* y-scale (- (* 1/22674816000000 (pow (PI) 5)) (+ (* -1/64800 (* (pow (PI) 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) (* 1/4534963200000 (pow (PI) 5))))) x-scale)) (* -2 (/ (* (pow angle 2) (* y-scale (- (* -1/30855889612800000000 (pow (PI) 7)) (+ (* -1/64800 (* (pow (PI) 2) (- (* 1/22674816000000 (pow (PI) 5)) (+ (* -1/64800 (* (pow (PI) 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) (* 1/4534963200000 (pow (PI) 5)))))) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* 1/25194240000 (* (pow (PI) 4) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3)))))))))) x-scale))))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a))))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle)
1
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(* 1/180 (* angle (PI)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))
1
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI)))))
(/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI)))))
(/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI)))))
(/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI)))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI)))))
(/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI)))))
(/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI)))))
(/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI)))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(* x-scale (PI))
(* x-scale (PI))
(* x-scale (PI))
(* x-scale (PI))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(* x-scale (PI))
(* x-scale (PI))
(* x-scale (PI))
(* x-scale (PI))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(* x-scale (PI))
(* x-scale (PI))
(* x-scale (PI))
(* x-scale (PI))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(/ y-scale (* angle (* x-scale (PI))))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(/ x-scale (* angle (* y-scale (PI))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
Outputs
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (-.f64 (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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)))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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)))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))) (*.f64 b b) (-.f64 (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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)))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 b b) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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)))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))) (*.f64 a a))) (*.f64 b b) (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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)))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))))) (*.f64 b b) (*.f64 (-.f64 (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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)))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 b b) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (-.f64 (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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)))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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)))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))) (*.f64 b b) (-.f64 (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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)))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 b b) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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)))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))) (*.f64 a a))) (*.f64 b b) (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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)))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))))) (*.f64 b b) (*.f64 (-.f64 (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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)))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 b b) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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)))))
(+ (/ (* b (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(fma.f64 b (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 a a) 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))))
(+ (* b (+ (* -1 (* b (- (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (pow (+ a (* -1 a)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (/ (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(fma.f64 (fma.f64 (neg.f64 b) (-.f64 (*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 a a) 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))))))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (*.f64 a a) 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 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 a a) 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)))))))) b (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))))
(+ (* b (+ (* b (+ (* -1 (- (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (pow (+ a (* -1 a)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (pow (+ a (* -1 a)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow a 2))) (/ (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (/ (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 a a) 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))))))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (*.f64 a a) 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 a a)) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) 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)))))))) b (neg.f64 (-.f64 (*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 a a) 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))))))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (*.f64 a a) 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)))))))))) b (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 a a) 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)))))))) b (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(+ (* -2 (/ (* b (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))
(*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (*.f64 y-scale (/.f64 (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)))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (* b (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI))))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (*.f64 (neg.f64 y-scale) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 a a) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) (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))) y-scale) (*.f64 (*.f64 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -2 binary64))) b (*.f64 (*.f64 y-scale (/.f64 (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)))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* b (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* 2 (- (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* (pow a 4) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) b) (fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (*.f64 (neg.f64 y-scale) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 a a) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) (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))) y-scale) (*.f64 (*.f64 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 a a)) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 (-.f64 (*.f64 (neg.f64 y-scale) (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 a a) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) (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))) y-scale) (*.f64 (*.f64 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal 2 binary64))) b (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 a a) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -2 binary64))) b (*.f64 (*.f64 y-scale (/.f64 (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)))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* b (* x-scale (+ a (* -1 a)))) (* (pow a 2) (* angle (* y-scale (PI)))))))
(*.f64 #s(literal -2 binary64) (+.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 b (/.f64 (*.f64 #s(literal 0 binary64) x-scale) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))) b (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))) (pow a 2))) (/ (* x-scale (+ a (* -1 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))) (* 2 (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) b) (fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))) (*.f64 a a)) (/.f64 (*.f64 #s(literal 0 binary64) x-scale) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale)))) (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))) #s(literal 2 binary64))) b (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))) b (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 b b)) (-.f64 (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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)))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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)))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))) (*.f64 b b) (-.f64 (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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)))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 b b) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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)))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))) (*.f64 a a))) (*.f64 b b) (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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)))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 a a))))) (*.f64 b b) (*.f64 (-.f64 (*.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.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)))))) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 a #s(literal 4 binary64)) (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 b b) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 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))))) #s(literal -1/2 binary64)))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* b (* x-scale (+ a (* -1 a)))) (* (pow a 2) (* angle (* y-scale (PI)))))))
(*.f64 #s(literal -2 binary64) (+.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 b (/.f64 (*.f64 #s(literal 0 binary64) x-scale) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))) b (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* b (+ (* -2 (/ (* x-scale (+ a (* -1 a))) (* (pow a 2) (* angle (* y-scale (PI)))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))) (pow a 2))) (/ (* x-scale (+ a (* -1 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))) (* 2 (- (/ y-scale (* (pow a 2) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))) (/ (* x-scale (pow (+ a (* -1 a)) 2)) (* (pow a 4) (* angle (* y-scale (PI)))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) b) (fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))) (*.f64 a a)) (/.f64 (*.f64 #s(literal 0 binary64) x-scale) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale)))) (*.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) angle) (*.f64 (PI.f64) y-scale))) (/.f64 x-scale (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))) #s(literal 2 binary64))) b (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale)))) b (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))))
(+ (* -2 (/ (* b (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(*.f64 #s(literal -2 binary64) (fma.f64 b (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 a a) 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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)))))))
(+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* b (+ (* -2 (/ (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 2 (* b (- (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (pow (+ a (* -1 a)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) b) (-.f64 (*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 a a) 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))))))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (*.f64 a a) 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 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 a a) 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))))))))) b (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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)))))))
(+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* b (+ (* -2 (/ (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* b (+ (* -2 (* b (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (pow (+ a (* -1 a)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow a 2))) (/ (* y-scale (* (+ a (* -1 a)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 2 (- (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (/ (* y-scale (* (pow (+ a (* -1 a)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) b) (fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 a a) 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))))))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (*.f64 a a) 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 a a)) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) 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 (-.f64 (*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 a a) 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))))))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (*.f64 a a) 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)))))))) #s(literal 2 binary64))) b (*.f64 #s(literal -2 binary64) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 a a) 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))))))))) b (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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)))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64)))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 a a))) (pow.f64 b #s(literal 6 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64)))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 a a))) (pow.f64 b #s(literal 6 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))
(+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(fma.f64 y-scale (neg.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b 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))))))))
(+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (- (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
(fma.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b 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 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))) (neg.f64 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (*.f64 a a) y-scale) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 b b))))
(+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (- (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 3)) (/ (* (pow a 2) (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a))))) (* (pow b 3) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(fma.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b 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)))))) (fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))) (neg.f64 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (*.f64 a a) y-scale) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 b b) b)) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 b b) b) 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 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))) (neg.f64 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (*.f64 a a) y-scale) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 b b))))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -2 binary64) (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))
(fma.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.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))) x-scale)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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 (fma.f64 (*.f64 a a) (*.f64 y-scale (/.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))) x-scale))) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)))))) (*.f64 b b)))))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (+ (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))
(fma.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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 (fma.f64 (*.f64 a a) (*.f64 y-scale (/.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))) x-scale))) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 #s(literal 0 binary64) (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))) x-scale))) (*.f64 (*.f64 b b) b)) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.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))) x-scale)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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 (fma.f64 (*.f64 a a) (*.f64 y-scale (/.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))) x-scale))) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)))))) (*.f64 b b))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(fma.f64 (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))
(fma.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle)) (/.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 b b)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* -2 (/ (+ (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI))))) (* (+ a (* -1 a)) (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))
(fma.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 (*.f64 (neg.f64 a) a) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 (*.f64 b b) b)) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle)) (/.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 b b))))))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64)))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 a a))) (pow.f64 b #s(literal 6 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(fma.f64 (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))
(fma.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle)) (/.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 b b)))))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* -2 (/ (+ (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI))))) (* (+ a (* -1 a)) (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))) (* 2 (/ (- (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI)))) (+ (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI)))) (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))
(fma.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 (*.f64 (neg.f64 a) a) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 (*.f64 b b) b)) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle)) (/.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) (*.f64 b b))))))
(* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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)))))) #s(literal 2 binary64))
(+ (* -2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(fma.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b 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))))))) #s(literal -2 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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)))))) #s(literal 2 binary64)))
(+ (* -2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2)))))
(fma.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (*.f64 (*.f64 (*.f64 a a) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))) (neg.f64 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (*.f64 a a) y-scale) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 b b))) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b 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))))))) #s(literal -2 binary64)))
(+ (* -2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -2 (/ (+ (* (+ a (* -1 a)) (- (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* (pow a 2) (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 3))) (+ (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))))
(fma.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b 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))))))) #s(literal -2 binary64) (fma.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (*.f64 (*.f64 (*.f64 a a) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))) (neg.f64 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (*.f64 a a) y-scale) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 b b))) (*.f64 (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))) (neg.f64 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (*.f64 a a) y-scale) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (*.f64 a a) y-scale) (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 b b) b)) #s(literal -2 binary64))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64)))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 a a))) (pow.f64 b #s(literal 6 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64)))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 a a))) (pow.f64 b #s(literal 6 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))
(+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(fma.f64 y-scale (neg.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b 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))))))))
(+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) b)) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) b)))
(neg.f64 (fma.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (neg.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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)))))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (*.f64 a a) y-scale) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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)))))))) b) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))) b)))
(+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) b)) (+ (* -1 (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow a 2) (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a))))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) b)) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) b)))
(neg.f64 (fma.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (neg.f64 (fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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)))))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (*.f64 a a) y-scale) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))) b) (-.f64 (fma.f64 (*.f64 (neg.f64 a) a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (*.f64 (*.f64 a a) y-scale) (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 b 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))))))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (*.f64 a a) y-scale) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))))) b) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))) b)))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64))
(+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* b (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 b x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -2 binary64) (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))
(+ (* -1 (/ (+ (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(-.f64 (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale)) (/.f64 (-.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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)) (fma.f64 (*.f64 a a) (*.f64 y-scale (/.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))) x-scale))) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale))))) b))) b))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ a (* -1 a)) 2))) (* x-scale (sin (* 1/180 (* angle (PI)))))) (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (/ (* (pow a 2) (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) b))) b)) (* 2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ a (* -1 a)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) b)) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(-.f64 (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale))) #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (-.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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)) (fma.f64 (*.f64 a a) (*.f64 y-scale (/.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))) x-scale))) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale))))) (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (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)) (fma.f64 (*.f64 a a) (*.f64 y-scale (/.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))) x-scale))) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (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))) x-scale))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 #s(literal 0 binary64) (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))) x-scale))) b))) b)) b))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(fma.f64 (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) b))) b)))
(-.f64 (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)) (/.f64 (fma.f64 (/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a) a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (neg.f64 (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle)))))) b) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) angle))) b))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI)))))) b))) b))) b)))
(-.f64 (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a) a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (neg.f64 (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle)))))) (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 (neg.f64 a) a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (neg.f64 (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle)))))) (*.f64 (*.f64 (neg.f64 a) a) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) b))) b)) b))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) 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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64)))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (pow.f64 b #s(literal 4 binary64))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a))) (*.f64 a a))) (pow.f64 b #s(literal 6 binary64))) (/.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (pow.f64 (cos.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 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))))))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* y-scale (+ a (* -1 a))) (* angle (* b (* x-scale (PI)))))))
(fma.f64 (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) x-scale) b) angle))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) b))) b)))
(-.f64 (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)) (/.f64 (fma.f64 (/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a) a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (neg.f64 (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle)))))) b) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) angle))) b))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* y-scale (+ a (* -1 a))) (* angle (* x-scale (PI))))) (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (+ (* -1 (/ (* y-scale (pow (+ a (* -1 a)) 2)) (* angle (* x-scale (PI))))) (* -1 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))))) (* -1 (/ (* (pow a 2) (* y-scale (+ a (* -1 a)))) (* angle (* x-scale (PI)))))) b))) b))) b)))
(-.f64 (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a) a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (neg.f64 (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle)))))) (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 (neg.f64 a) a) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (neg.f64 (fma.f64 (*.f64 a a) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle)))))) (*.f64 (*.f64 (neg.f64 a) a) (*.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) x-scale) angle))))) b))) b)) b))
(* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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)))))) #s(literal 2 binary64))
(+ (* -2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* b (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(fma.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b 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))))))) #s(literal -2 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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)))))) #s(literal 2 binary64)))
(+ (* -1 (/ (+ (* 2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (* -1 (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) b))) b)) (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(-.f64 (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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)))))) #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (*.f64 (neg.f64 a) a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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)))))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (*.f64 a a) y-scale) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))) b))) b))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -2 (- (* -1 (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* -2 (/ (+ (* -1 (* (+ a (* -1 a)) (- (* -1 (/ (* (pow a 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ a (* -1 a)) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow a 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* (pow a 2) (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) b))) b)) (* 2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ a (* -1 a)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) b)) (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(-.f64 (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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)))))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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)))))) #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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)))))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (*.f64 a a) y-scale) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (fma.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 (neg.f64 a) a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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)))))) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (*.f64 a a) y-scale) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 (*.f64 a a) y-scale) (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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)))))) b))) b)) b))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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) (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))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))) (*.f64 a a) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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) (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)))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))) (*.f64 b b))) (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))))) (*.f64 a a) (*.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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) (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)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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) (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))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))) (*.f64 a a) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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) (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)))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))) (*.f64 b b))) (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))))) (*.f64 a a) (*.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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) (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)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))
(+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* a (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(fma.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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 a y-scale) (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 b b) 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)))))))
(+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -1 (* a (- (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) 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)))))) (neg.f64 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) 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 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 b b) 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)))))))))) (neg.f64 a) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) 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))))))) a (*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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)))))))
(+ (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* a (+ (* -1 (- (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (* a (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 2)))))) (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) 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)))))) (neg.f64 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) 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 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 b b) 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 b b)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) 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))))))) a (neg.f64 (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) 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)))))) (neg.f64 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) 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 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 b b) 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)))))))))))) a (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) 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))))))) a (*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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)))))))
(* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64))
(+ (* -2 (/ (* a (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))
(fma.f64 (*.f64 a (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) #s(literal -2 binary64) (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))
(+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (* a (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) a) (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (fma.f64 y-scale (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -2 binary64))) a (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))
(+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* a (+ (* -2 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -2 (* a (+ (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))) (pow b 2))))) (* 2 (- (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* y-scale (* (cos (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) a) (fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (fma.f64 y-scale (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (*.f64 b b)) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 (-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (neg.f64 (fma.f64 y-scale (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) #s(literal 2 binary64))) a (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 b b) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -2 binary64))) a (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* a (* y-scale (+ b (* -1 b)))) (* angle (* (pow b 2) (* x-scale (PI)))))))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) y-scale) a) (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (* a (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))) (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (/.f64 x-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) y-scale))) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale))) (/.f64 y-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))))) a (/.f64 (*.f64 #s(literal 0 binary64) y-scale) (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))))) a (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))) (* a (+ (* -2 (* a (+ (* -1 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 4) (* x-scale (PI)))))) (/ (* (+ b (* -1 b)) (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))) (pow b 2))))) (* 2 (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) a) (fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 x-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) y-scale))) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale))) (/.f64 y-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))))) (*.f64 b b)) (/.f64 (neg.f64 (*.f64 #s(literal 0 binary64) y-scale)) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale)))) (*.f64 (-.f64 (/.f64 x-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) y-scale))) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale))) (/.f64 y-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))))) #s(literal 2 binary64))) a (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) y-scale)) (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale)))) a (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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) (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))
(+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))) (*.f64 a a) (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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) (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)))
(+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))) (*.f64 b b))) (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 b b))))) (*.f64 a a) (*.f64 (fma.f64 x-scale (/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) y-scale) (*.f64 (*.f64 (*.f64 b b) (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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 b #s(literal 4 binary64)) (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 a a) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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) (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)))
(* -2 (/ y-scale (* angle (* x-scale (PI)))))
(*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* a (* y-scale (+ b (* -1 b)))) (* angle (* (pow b 2) (* x-scale (PI)))))))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) y-scale) a) (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))) #s(literal 2 binary64) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (* a (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI))))))))) (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (/.f64 x-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) y-scale))) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale))) (/.f64 y-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))))) a (/.f64 (*.f64 #s(literal 0 binary64) y-scale) (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))))) a (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* a (+ (* 2 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 2) (* x-scale (PI)))))) (* a (+ (* -2 (* a (+ (* -1 (/ (* y-scale (+ b (* -1 b))) (* angle (* (pow b 4) (* x-scale (PI)))))) (/ (* (+ b (* -1 b)) (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))) (pow b 2))))) (* 2 (- (/ x-scale (* angle (* (pow b 2) (* y-scale (PI))))) (+ (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))) (/ (* y-scale (pow (+ b (* -1 b)) 2)) (* angle (* (pow b 4) (* x-scale (PI)))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) a) (fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 x-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) y-scale))) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale))) (/.f64 y-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))))) (*.f64 b b)) (/.f64 (neg.f64 (*.f64 #s(literal 0 binary64) y-scale)) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale)))) (*.f64 (-.f64 (/.f64 x-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) y-scale))) (fma.f64 y-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle (pow.f64 b #s(literal 4 binary64))) (*.f64 (PI.f64) x-scale))) (/.f64 y-scale (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale))))) #s(literal 2 binary64))) a (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) y-scale)) (*.f64 (*.f64 angle (*.f64 b b)) (*.f64 (PI.f64) x-scale)))) a (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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)))))) #s(literal 2 binary64))
(+ (* -2 (/ (* a (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(fma.f64 (/.f64 (*.f64 (*.f64 a y-scale) (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 b b) 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)))))) #s(literal -2 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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)))))) #s(literal 2 binary64)))
(+ (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* 2 (* a (- (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) a) (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) 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)))))) (neg.f64 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) 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 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 b b) 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 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) 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)))))) #s(literal -2 binary64))) a (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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)))))) #s(literal 2 binary64)))
(+ (* 2 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* a (+ (* -2 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b)))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* a (+ (* -2 (* a (+ (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ b (* -1 b)))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (+ b (* -1 b)) (- (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))) (pow b 2))))) (* 2 (- (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1 (/ (* y-scale (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow (+ b (* -1 b)) 2))) (* (pow b 4) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -1 (/ (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) a) (fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) 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)))))) (neg.f64 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) 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 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 b b) 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 b b)) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) 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 (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) 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)))))) (neg.f64 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) 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 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 b b) 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)))))))))) #s(literal 2 binary64))) a (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 (*.f64 b b) 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)))))) #s(literal -2 binary64))) a (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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)))))) #s(literal 2 binary64)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.f64 (/.f64 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 b b))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (/.f64 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.f64 (/.f64 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 b b))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (/.f64 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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)))))
(+ (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))))
(+ (* -1 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))) (+ (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(-.f64 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (*.f64 (neg.f64 (*.f64 b b)) (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 a a)))
(+ (* -1 (/ (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 3))) (+ (* -1 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))) (+ (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 3) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
(fma.f64 #s(literal 0 binary64) (/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 b b)) (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 a a) a)) (-.f64 (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a 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)))))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 a a) a) 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (*.f64 (neg.f64 (*.f64 b b)) (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 a a))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))))
(*.f64 #s(literal -2 binary64) (fma.f64 y-scale (/.f64 (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 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 a x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2)))))
(fma.f64 #s(literal -2 binary64) (fma.f64 y-scale (/.f64 (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 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 a x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (*.f64 (/.f64 (-.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (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))) x-scale)) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale)))) (*.f64 a a)) #s(literal 2 binary64)))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (pow a 3))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))))))
(fma.f64 #s(literal -2 binary64) (fma.f64 y-scale (/.f64 (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 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 a x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))) (fma.f64 (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (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))) x-scale)) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 0 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 a a) a)) #s(literal -2 binary64) (*.f64 (/.f64 (-.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (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))) x-scale)) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale)))) (*.f64 a a)) #s(literal 2 binary64))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(*.f64 #s(literal -2 binary64) (+.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))
(fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a)))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (*.f64 a a)) #s(literal 2 binary64)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) (pow a 3))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))
(fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a)))) (fma.f64 (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (/.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) #s(literal 0 binary64)) (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 (*.f64 a a) a)) #s(literal -2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (*.f64 a a)) #s(literal 2 binary64))))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.f64 (/.f64 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 b b))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (/.f64 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(*.f64 #s(literal -2 binary64) (+.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a)))))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))
(fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a)))) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (*.f64 a a)) #s(literal 2 binary64)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) (pow a 3))) (* 2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))
(fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a)))) (fma.f64 (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (/.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) #s(literal 0 binary64)) (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 (*.f64 a a) a)) #s(literal -2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (*.f64 a a)) #s(literal 2 binary64))))
(* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))))
(+ (* -2 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
(*.f64 #s(literal -2 binary64) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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)))))))
(+ (* -2 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2)))))
(fma.f64 #s(literal -2 binary64) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (-.f64 (*.f64 (neg.f64 (*.f64 b b)) (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 a a)) #s(literal 2 binary64)))
(+ (* -2 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* (pow b 2) (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 3))) (* 2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow a 2))))))
(fma.f64 #s(literal -2 binary64) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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)))))) (fma.f64 (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (*.f64 (neg.f64 (*.f64 b b)) (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 b b) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 a a) a)) #s(literal -2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 b b)) (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 a a)) #s(literal 2 binary64))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.f64 (/.f64 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 b b))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (/.f64 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.f64 (/.f64 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 b b))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (/.f64 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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)))))
(+ (* -1 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(fma.f64 (neg.f64 y-scale) (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))))
(+ (* -1 (/ (- (+ (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) a)) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (fma.f64 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) y-scale) (*.f64 (*.f64 a 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 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) y-scale) (*.f64 (*.f64 a 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 (*.f64 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a 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))))))))) a))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* -1 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* (pow b 2) (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) a))) a)) (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) a)) (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (neg.f64 (-.f64 (*.f64 (neg.f64 (*.f64 b b)) (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (fma.f64 #s(literal 0 binary64) (-.f64 (*.f64 (neg.f64 (*.f64 b b)) (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 b b) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))))) a)) a)) a))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* 2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* a (* x-scale (cos (* 1/180 (* angle (PI)))))))))
(fma.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 a x-scale) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 2 binary64) (*.f64 (*.f64 y-scale (/.f64 (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)))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) a))) a)))
(-.f64 (*.f64 (*.f64 y-scale (/.f64 (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)) (/.f64 (*.f64 #s(literal -2 binary64) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 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 (neg.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (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))) x-scale)) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale)))) a))) a))
(+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b)))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -1 (/ (+ (* 2 (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (/ (* y-scale (* (sin (* 1/180 (* angle (PI)))) (pow (+ b (* -1 b)) 2))) (* x-scale (cos (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (/ (* (pow b 2) (* y-scale (* (sin (* 1/180 (* angle (PI)))) (+ b (* -1 b))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) a))) a))) a)))
(-.f64 (*.f64 (*.f64 y-scale (/.f64 (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)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale)) #s(literal -2 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (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))) x-scale)) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale)))) (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (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))) x-scale)) (fma.f64 (*.f64 b b) (*.f64 y-scale (/.f64 (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 #s(literal 0 binary64) (sin.f64 (*.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))) x-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 0 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))) a))) a)) a))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(fma.f64 (*.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a))) #s(literal 2 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) a))) a)))
(-.f64 (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (/.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) a))) a))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -1 (/ (+ (* 2 (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) a))) a))) a)))
(-.f64 (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) x-scale)) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (/.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) #s(literal 0 binary64)) (*.f64 (*.f64 (PI.f64) y-scale) angle))) a))) a)) a))
(* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))
(fma.f64 (/.f64 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))
(+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))
(fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-scale (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (*.f64 b b))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) #s(literal 1/4 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 b b))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (/.f64 (fma.f64 (neg.f64 x-scale) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (neg.f64 (*.f64 b b)) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal -8 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) 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 (neg.f64 (*.f64 b b)) (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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 a a)) #s(literal 1/2 binary64))))
(* -2 (/ x-scale (* angle (* y-scale (PI)))))
(*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* x-scale (+ b (* -1 b))) (* a (* angle (* y-scale (PI)))))))
(fma.f64 (*.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) a))) #s(literal 2 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -2 (/ (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) a))) a)))
(-.f64 (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (/.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) a))) a))
(+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* -1 (/ (+ (* -2 (/ (* x-scale (+ b (* -1 b))) (* angle (* y-scale (PI))))) (* -1 (/ (+ (* 2 (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))) (+ (/ (* x-scale (pow (+ b (* -1 b)) 2)) (* angle (* y-scale (PI)))) (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (/ (* (pow b 2) (* x-scale (+ b (* -1 b)))) (* angle (* y-scale (PI))))) a))) a))) a)))
(-.f64 (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 #s(literal 0 binary64) x-scale)) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (/.f64 (fma.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 b b) (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))) (fma.f64 x-scale (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle)) (*.f64 (*.f64 b b) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))))) (/.f64 (*.f64 (*.f64 (*.f64 b b) x-scale) #s(literal 0 binary64)) (*.f64 (*.f64 (PI.f64) y-scale) angle))) a))) a)) a))
(* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))))
(+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* a (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a 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)))))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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)))))))
(+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -2 (/ (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) a))) a)))
(-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 -2 binary64) (fma.f64 y-scale (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (neg.f64 (*.f64 b b)) (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))))) a))) a))
(+ (* -2 (/ (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (+ (* -2 (/ (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (+ (* 2 (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* 2 (/ (+ (* -1 (* (+ b (* -1 b)) (- (* -1 (/ (* (pow b 2) (* y-scale (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (/ (* y-scale (* (pow (+ b (* -1 b)) 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* y-scale (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (/ (* (pow b 2) (* y-scale (* (+ b (* -1 b)) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) a))) a))) a)))
(-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))) #s(literal -2 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 (*.f64 (neg.f64 (*.f64 b b)) (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (fma.f64 #s(literal 0 binary64) (-.f64 (*.f64 (neg.f64 (*.f64 b b)) (*.f64 y-scale (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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))))))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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 b b) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #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))))))) a))) a)) a))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (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 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 angle angle)) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) #s(literal 32400 binary64)))) (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 a a)) (*.f64 y-scale y-scale))))) (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/102036672000000 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.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)))) #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (*.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)))))) #s(literal 1/2 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) #s(literal 32400 binary64)))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (fma.f64 (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (fma.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/3856986201600000000 binary64)))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) #s(literal 32400 binary64))))) (*.f64 angle angle) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) #s(literal 32400 binary64)))))) (*.f64 angle angle) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) #s(literal 1/2 binary64))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (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 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 angle angle)) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) #s(literal 32400 binary64)))) (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 a a)) (*.f64 y-scale y-scale))))) (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/102036672000000 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.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)))) #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (*.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)))))) #s(literal 1/2 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) #s(literal 32400 binary64)))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (fma.f64 (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (fma.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/3856986201600000000 binary64)))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) #s(literal 32400 binary64))))) (*.f64 angle angle) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) #s(literal 32400 binary64)))))) (*.f64 angle angle) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) #s(literal 1/2 binary64))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* -180 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 #s(literal -180 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* -1 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) angle)
(/.f64 (fma.f64 (neg.f64 (*.f64 angle angle)) (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (/.f64 (*.f64 #s(literal -180 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))))) angle)
(/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* -1 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle)
(/.f64 (fma.f64 (neg.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64)))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))) #s(literal 32400 binary64)))) (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))))) (*.f64 angle angle) (/.f64 (*.f64 #s(literal -180 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))))) angle)
(/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* -1 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* -1 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle)
(/.f64 (fma.f64 (fma.f64 (neg.f64 (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64)))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))) #s(literal 32400 binary64)))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (fma.f64 (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64))) (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (fma.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (fma.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/3856986201600000000 binary64))))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))) #s(literal 32400 binary64))))) (*.f64 angle angle) (-.f64 (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64)))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))) #s(literal 32400 binary64)))))) (*.f64 angle angle) (neg.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))))) (*.f64 angle angle) (/.f64 (*.f64 #s(literal -180 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))))) angle)
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))
1
#s(literal 1 binary64)
(+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2))))
(fma.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/3149280000 (* (pow angle 2) (pow (PI) 4))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/32400 binary64))) (*.f64 angle angle) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/765275040000000 (* (pow angle 2) (pow (PI) 6))) (* 1/3149280000 (pow (PI) 4)))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/32400 binary64))) (*.f64 angle angle) #s(literal 1 binary64))
(* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 #s(literal 360 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(/ (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a))))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle angle)) (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (/.f64 (*.f64 #s(literal 360 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64)))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))) #s(literal 32400 binary64)))) (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))))) (*.f64 angle angle) (/.f64 (*.f64 #s(literal 360 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle)
(/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 a a) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 b b))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64)))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))) #s(literal 32400 binary64)))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (fma.f64 (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64))) (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (fma.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (fma.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/3856986201600000000 binary64))))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))) #s(literal 32400 binary64))))) (*.f64 angle angle) (-.f64 (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64)))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))) #s(literal 32400 binary64)))))) (*.f64 angle angle) (*.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) #s(literal 2 binary64))) (*.f64 angle angle) (/.f64 (*.f64 #s(literal 360 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))))) angle)
(* 1/180 (* angle (PI)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle)
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (- (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (- (* 1/22674816000000 (pow (PI) 5)) (+ (* -1/64800 (* (pow (PI) 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) (* 1/4534963200000 (pow (PI) 5)))))) (* -1/11664000 (pow (PI) 3))))))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (fma.f64 (-.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 angle angle) (*.f64 #s(literal 1/11664000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle)
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (- (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (- (+ (* 1/22674816000000 (pow (PI) 5)) (* (pow angle 2) (- (* -1/30855889612800000000 (pow (PI) 7)) (+ (* -1/64800 (* (pow (PI) 2) (- (* 1/22674816000000 (pow (PI) 5)) (+ (* -1/64800 (* (pow (PI) 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) (* 1/4534963200000 (pow (PI) 5)))))) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* 1/25194240000 (* (pow (PI) 4) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3)))))))))) (+ (* -1/64800 (* (pow (PI) 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) (* 1/4534963200000 (pow (PI) 5)))))) (* -1/11664000 (pow (PI) 3))))))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (fma.f64 (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 #s(literal -1/4407984230400000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64)))))) (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64))) (fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 angle angle) (*.f64 #s(literal 1/11664000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))))) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle)
(* -1/90 (/ (* angle (* y-scale (PI))) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))
(* angle (+ (* -2 (/ (* (pow angle 2) (* y-scale (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) x-scale)) (* -1/90 (/ (* y-scale (PI)) x-scale))))
(*.f64 (fma.f64 (*.f64 (*.f64 angle angle) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) y-scale) x-scale)) #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) y-scale) x-scale) #s(literal -1/90 binary64))) angle)
(* angle (+ (* -1/90 (/ (* y-scale (PI)) x-scale)) (* (pow angle 2) (+ (* -2 (/ (* y-scale (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3)))) x-scale)) (* -2 (/ (* (pow angle 2) (* y-scale (- (* 1/22674816000000 (pow (PI) 5)) (+ (* -1/64800 (* (pow (PI) 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) (* 1/4534963200000 (pow (PI) 5)))))) x-scale))))))
(*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 y-scale (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) x-scale) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) y-scale) (-.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) x-scale))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (PI.f64) y-scale) x-scale) #s(literal -1/90 binary64))) angle)
(* angle (+ (* -1/90 (/ (* y-scale (PI)) x-scale)) (* (pow angle 2) (+ (* -2 (/ (* y-scale (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3)))) x-scale)) (* (pow angle 2) (+ (* -2 (/ (* y-scale (- (* 1/22674816000000 (pow (PI) 5)) (+ (* -1/64800 (* (pow (PI) 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) (* 1/4534963200000 (pow (PI) 5))))) x-scale)) (* -2 (/ (* (pow angle 2) (* y-scale (- (* -1/30855889612800000000 (pow (PI) 7)) (+ (* -1/64800 (* (pow (PI) 2) (- (* 1/22674816000000 (pow (PI) 5)) (+ (* -1/64800 (* (pow (PI) 2) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3))))) (* 1/4534963200000 (pow (PI) 5)))))) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* 1/25194240000 (* (pow (PI) 4) (- (* -1/34992000 (pow (PI) 3)) (* -1/11664000 (pow (PI) 3)))))))))) x-scale))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 y-scale (/.f64 (-.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) x-scale) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) y-scale) (-.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 #s(literal 1/4534963200000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (fma.f64 (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 #s(literal -1/4407984230400000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))))))) x-scale))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) y-scale) x-scale) #s(literal -2 binary64))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (PI.f64) y-scale) x-scale) #s(literal -1/90 binary64))) angle)
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (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 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 90 binary64))
(/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 angle angle)) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) #s(literal 32400 binary64)))) (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)
(/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 a a)) (*.f64 y-scale y-scale))))) (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/102036672000000 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (*.f64 (*.f64 (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.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)))) #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (*.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)))))) #s(literal 1/2 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) #s(literal 32400 binary64)))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (fma.f64 (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (fma.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/3856986201600000000 binary64)))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) #s(literal 32400 binary64))))) (*.f64 angle angle) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 a a)) (*.f64 y-scale y-scale))) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (fma.f64 (/.f64 (-.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale)) #s(literal -1/3149280000 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.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)))) #s(literal 2 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a)))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal -1/787320000 binary64)) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) #s(literal 2 binary64)) (*.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))))) #s(literal 1/4 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 b b)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) #s(literal 32400 binary64)))))) (*.f64 angle angle) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (*.f64 (PI.f64) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))))) #s(literal 1/2 binary64))) (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))) #s(literal 90 binary64))) angle)
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 #s(literal 360 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(/ (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a))))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle angle)) (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (/.f64 (*.f64 #s(literal 360 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) angle)
(/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64)))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))) #s(literal 32400 binary64)))) (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))))) (*.f64 angle angle) (/.f64 (*.f64 #s(literal 360 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))))) angle)
(/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* (pow angle 2) (+ (* 2 (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))) (* (PI) (* (+ a b) (- b a))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (* (+ a b) (- b a)))) (* -1/30855889612800000000 (* (pow (PI) 7) (* (+ a b) (- b a))))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))))))))))) (* 2 (- (* 180 (/ (* y-scale (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))) (- (* 180 (/ (* y-scale (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (* (+ a b) (- b a)))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (* (+ a b) (- b a)))) (* -1/34992000 (* (pow (PI) 3) (* (+ a b) (- b a))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))) (* (PI) (* (+ a b) (- b a))))) (* 32400 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (* (+ a b) (- b a)))) (* 1/2267481600000 (* (pow (PI) 5) (* (+ a b) (- b a)))))))) (* x-scale (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))))))))))) angle)
(/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64)))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))) #s(literal 32400 binary64)))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (fma.f64 (*.f64 (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64))) (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (fma.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (fma.f64 (*.f64 #s(literal -1/1469328076800000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/3856986201600000000 binary64))))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))) #s(literal 32400 binary64))))) (*.f64 angle angle) (-.f64 (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64)) (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 180 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 1/1511654400000 binary64)))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))) #s(literal 32400 binary64)))))) (*.f64 angle angle) (*.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) y-scale) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal -1/8748000 binary64))) (*.f64 (*.f64 x-scale (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))))))) #s(literal 2 binary64))) (*.f64 angle angle) (/.f64 (*.f64 #s(literal 360 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) x-scale) (*.f64 (-.f64 b a) (+.f64 b a))))) angle)
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 angle angle) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/25194240000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 angle angle) (*.f64 #s(literal -1/64800 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 angle angle) #s(literal 1 binary64))
(* 1/180 (* angle (PI)))
(*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle)
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle)
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64))) (*.f64 angle angle) (*.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle)
1
#s(literal 1 binary64)
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))
(fma.f64 (*.f64 #s(literal -1/16200 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/1574640000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 angle angle) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4)))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/382637520000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 angle angle) (*.f64 #s(literal -1/16200 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 angle angle) #s(literal 1 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI)))))
(/.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))))
(/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI)))))
(/.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))))
(/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI)))))
(/.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))))
(/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI)))))
(/.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))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))
(* 1/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI)))))
(/.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))))
(/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI)))))
(/.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))))
(/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI)))))
(/.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))))
(/ (sin (* 1/180 (* angle (PI)))) (cos (* 1/180 (* angle (PI)))))
(/.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))))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* x-scale (* y-scale (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* angle (* (PI) (* (+ a b) (- b a))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal 2 binary64))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle)))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal -1/2 binary64))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal -1/2 binary64))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) x-scale)
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(* x-scale (PI))
(*.f64 (PI.f64) x-scale)
(* x-scale (PI))
(*.f64 (PI.f64) x-scale)
(* x-scale (PI))
(*.f64 (PI.f64) x-scale)
(* x-scale (PI))
(*.f64 (PI.f64) x-scale)
(* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal -1/2 binary64))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (*.f64 a a) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))) (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) x-scale)
(/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (* (+ a b) (- b a)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))) x-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) x-scale)
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64)))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64)))) #s(literal -1/4 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64)))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64)))) #s(literal -1/4 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) x-scale)
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) x-scale)
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) x-scale)
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(* x-scale (PI))
(*.f64 (PI.f64) x-scale)
(* x-scale (PI))
(*.f64 (PI.f64) x-scale)
(* x-scale (PI))
(*.f64 (PI.f64) x-scale)
(* x-scale (PI))
(*.f64 (PI.f64) x-scale)
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64) (*.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64)))) x-scale)
(/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2))))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64)))) #s(literal -1/4 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64))))) x-scale)
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) x-scale)
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) x-scale)
(* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) x-scale)
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(/.f64 (neg.f64 (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64)))) x-scale)
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))) x-scale)
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(/.f64 (neg.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64)))) #s(literal -1/4 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64)))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(/.f64 (neg.f64 (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64)))) x-scale)
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))) x-scale)
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(/.f64 (neg.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64)))) #s(literal -1/4 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64)))))) x-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(* x-scale (PI))
(*.f64 (PI.f64) x-scale)
(* x-scale (PI))
(*.f64 (PI.f64) x-scale)
(* x-scale (PI))
(*.f64 (PI.f64) x-scale)
(* x-scale (PI))
(*.f64 (PI.f64) x-scale)
(* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64))
(* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))
(/.f64 (neg.f64 (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64)))) x-scale)
(* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))) x-scale)
(* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 (+ (/ (* (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))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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)))) 2) (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 x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (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))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (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 x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (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))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (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))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (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))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))
(/.f64 (neg.f64 (fma.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 4 binary64)))) #s(literal -1/4 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (-.f64 b a) (+.f64 b a))))) (fma.f64 (*.f64 y-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64)))))) x-scale)
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 x-scale) (fma.f64 (/.f64 (*.f64 a a) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle (*.f64 x-scale x-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 4 binary64)))) #s(literal -1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 4 binary64)))) #s(literal -1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 (*.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (fma.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 4 binary64)))) #s(literal -1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 3 binary64)) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1/4 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 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64))) (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)
(/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (* (+ a b) (- b a))))))) y-scale)
(/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64)))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64))))) y-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64)))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64))))) y-scale)
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) y-scale)
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) y-scale)
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) y-scale)
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64)))) y-scale)
(* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (fma.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/4 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal 1/2 binary64))))) y-scale)
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) y-scale)
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) y-scale)
(* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a)))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) y-scale)
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64)))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/8 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
(atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64)))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/8 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))
(/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* 180 (/ (atan (* 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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))
(*.f64 (/.f64 (atan.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 180 binary64))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* -1 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (/.f64 (*.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal 2 binary64))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))
(*.f64 (*.f64 y-scale (/.f64 (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))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(/ y-scale (* angle (* x-scale (PI))))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
(*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64)))))
(* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (*.f64 x-scale (/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (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))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64)))) (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 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))) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (*.f64 (-.f64 b a) (+.f64 b a))))) #s(literal -1/8 binary64) (fma.f64 (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 b b) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a)))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 4 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)) (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))) #s(literal 1/2 binary64))))))
(* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (* (+ a b) (- b a)))))))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (* (+ a b) (- b a))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (* (+ a b) (- b a))))))))))
(*.f64 (neg.f64 y-scale) (fma.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 (*.f64 angle (*.f64 y-scale y-scale)) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))) #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b b)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/ x-scale (* angle (* y-scale (PI))))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))
(* 2 (/ (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ a b) (- b a)))))))
(*.f64 (*.f64 y-scale (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (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 b a)) (-.f64 b a))))) #s(literal 2 binary64))

rewrite301.0ms (0.2%)

Memory
-11.5MiB live, 702.8MiB allocated
Rules
5 152×lower-*.f32
5 090×lower-*.f64
4 012×lower-/.f32
3 990×lower-/.f64
2 840×lower-fma.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01423063
02023027
18392954
272362738
081382666
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
31 → 423
Calls
Call 1
Inputs
(*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64)))
(sqrt.f64 (PI.f64))
(PI.f64)
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64))
(/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))
(*.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))))))
#s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))
(tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64)))
(/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle))
(*.f64 (PI.f64) x-scale)
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))
(/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))
(/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a))))
#s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))
(sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))
Outputs
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (PI.f64)))
(/.f64 (/.f64 #s(literal 180 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(/.f64 #s(literal -180 binary64) (neg.f64 (PI.f64)))
(/.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(/.f64 #s(literal 180 binary64) (PI.f64))
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 180 binary64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 #s(literal 180 binary64) (cbrt.f64 (PI.f64))))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (/.f64 #s(literal 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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 180 binary64) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)))
(/.f64 (/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(/.f64 (/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(/.f64 (/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) #s(literal 1 binary64)) (PI.f64))
(/.f64 (*.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))) #s(literal 180 binary64)) (neg.f64 (PI.f64)))
(/.f64 (*.f64 #s(literal 180 binary64) (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))))) (neg.f64 (PI.f64)))
(/.f64 (neg.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64))) (neg.f64 (PI.f64)))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) (PI.f64))
(/.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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64))))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) (cbrt.f64 (PI.f64))))
(*.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) (/.f64 #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)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) (PI.f64)))
(/.f64 (/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(/.f64 (/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(/.f64 (/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) #s(literal 1 binary64)) (PI.f64))
(/.f64 (*.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64))))))) #s(literal 180 binary64)) (neg.f64 (PI.f64)))
(/.f64 (*.f64 #s(literal 180 binary64) (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))))) (neg.f64 (PI.f64)))
(/.f64 (neg.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64))) (neg.f64 (PI.f64)))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (PI.f64))
(/.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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64))))
(*.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (PI.f64))))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64))))))) #s(literal -1 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(/.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 1 binary64)) (PI.f64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal -1 binary64)) (neg.f64 (PI.f64)))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 1 binary64)) (PI.f64))
(/.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(/.f64 (neg.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))))) (neg.f64 (neg.f64 (PI.f64))))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #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) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) (PI.f64))
(/.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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64))))))))
(neg.f64 (/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64))))))) (PI.f64)))
(neg.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) (neg.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(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (PI.f64))))
(*.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #s(literal 180 binary64)) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64)))))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (sqrt.f64 (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))))
(*.f64 #s(literal 180 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (sqrt.f64 (PI.f64)))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(/.f64 (/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #s(literal 180 binary64)) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(/.f64 (/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #s(literal 180 binary64)) #s(literal 1 binary64)) (PI.f64))
(/.f64 (*.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))))) (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64)))) (neg.f64 (sqrt.f64 (PI.f64))))
(/.f64 (*.f64 #s(literal -180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (sqrt.f64 (PI.f64)))) (neg.f64 (sqrt.f64 (PI.f64))))
(/.f64 (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (sqrt.f64 (PI.f64))) #s(literal -180 binary64)) (neg.f64 (sqrt.f64 (PI.f64))))
(/.f64 (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (sqrt.f64 (PI.f64))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/180 binary64)))
(/.f64 (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))))) (neg.f64 (sqrt.f64 (PI.f64))))
(/.f64 (*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) #s(literal 1 binary64)) (/.f64 (sqrt.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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))))))
(/.f64 (neg.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))))) (neg.f64 (sqrt.f64 (PI.f64))))
(/.f64 (neg.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #s(literal 180 binary64))) (neg.f64 (PI.f64)))
(/.f64 (*.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))))) #s(literal -180 binary64)) (*.f64 (neg.f64 (sqrt.f64 (PI.f64))) (neg.f64 (sqrt.f64 (PI.f64)))))
(/.f64 (*.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))))) #s(literal 180 binary64)) (neg.f64 (PI.f64)))
(/.f64 (*.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))))) #s(literal 1 binary64)) (*.f64 (neg.f64 (sqrt.f64 (PI.f64))) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/180 binary64))))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #s(literal -180 binary64)) (neg.f64 (PI.f64)))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/180 binary64))))
(/.f64 (*.f64 #s(literal -180 binary64) (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))))) (*.f64 (neg.f64 (sqrt.f64 (PI.f64))) (neg.f64 (sqrt.f64 (PI.f64)))))
(/.f64 (*.f64 #s(literal -180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))))) (neg.f64 (PI.f64)))
(/.f64 (*.f64 #s(literal 180 binary64) (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))))) (neg.f64 (PI.f64)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))))) (*.f64 (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/180 binary64)) (neg.f64 (sqrt.f64 (PI.f64)))))
(/.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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))))) (*.f64 (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/180 binary64)) (sqrt.f64 (PI.f64))))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64)))) (sqrt.f64 (PI.f64)))
(/.f64 #s(literal -180 binary64) (*.f64 (/.f64 (sqrt.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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))))) (neg.f64 (sqrt.f64 (PI.f64)))))
(/.f64 #s(literal -180 binary64) (*.f64 (neg.f64 (sqrt.f64 (PI.f64))) (/.f64 (sqrt.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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #s(literal 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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (sqrt.f64 (PI.f64))) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/180 binary64)))
(/.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (sqrt.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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))))))
(/.f64 #s(literal 180 binary64) (*.f64 (/.f64 (sqrt.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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))))) (sqrt.f64 (PI.f64))))
(/.f64 #s(literal 180 binary64) (*.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (PI.f64)) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #s(literal 180 binary64))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64))))) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/180 binary64))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/180 binary64)) (/.f64 (sqrt.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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (PI.f64))) #s(literal 180 binary64))
(*.f64 #s(literal -180 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (PI.f64)))))
(*.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (PI.f64))))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))))
(pow.f64 (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/180 binary64)) #s(literal -1 binary64))
(/.f64 #s(literal -180 binary64) (neg.f64 (sqrt.f64 (PI.f64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/180 binary64))))
(/.f64 #s(literal 180 binary64) (neg.f64 (neg.f64 (sqrt.f64 (PI.f64)))))
(/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/180 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/180 binary64)))
(neg.f64 (/.f64 #s(literal -180 binary64) (sqrt.f64 (PI.f64))))
(*.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) (pow.f64 (PI.f64) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (sqrt.f64 (cbrt.f64 (PI.f64))))
(*.f64 (sqrt.f64 (sqrt.f64 (PI.f64))) (sqrt.f64 (sqrt.f64 (PI.f64))))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) #s(literal 1/2 binary64)) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (PI.f64)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (PI.f64)))
(pow.f64 (PI.f64) #s(literal 1/2 binary64))
(sqrt.f64 (PI.f64))
(fabs.f64 (sqrt.f64 (PI.f64)))
(exp.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) #s(literal 1 binary64)) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1 binary64)))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 1 binary64)))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (cbrt.f64 (PI.f64)))
(*.f64 (cbrt.f64 (PI.f64)) (cbrt.f64 (*.f64 (PI.f64) (PI.f64))))
(*.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))
(*.f64 (PI.f64) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (PI.f64))
(pow.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/3 binary64))
(pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/2 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3 binary64))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
(pow.f64 (PI.f64) #s(literal 1 binary64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -1 binary64))
(/.f64 (PI.f64) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (PI.f64)))
(cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))
(sqrt.f64 (*.f64 (PI.f64) (PI.f64)))
(exp.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 1 binary64)))
(exp.f64 (log.f64 (PI.f64)))
(log.f64 (exp.f64 (PI.f64)))
(PI.f64)
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 #s(literal 180 binary64) (cbrt.f64 (PI.f64))))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (/.f64 #s(literal 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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 180 binary64) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)))
(/.f64 (/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(/.f64 (/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(/.f64 (/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) #s(literal 1 binary64)) (PI.f64))
(/.f64 (*.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))) #s(literal 180 binary64)) (neg.f64 (PI.f64)))
(/.f64 (*.f64 #s(literal 180 binary64) (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))))) (neg.f64 (PI.f64)))
(/.f64 (neg.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64))) (neg.f64 (PI.f64)))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) (PI.f64))
(/.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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64))))
(*.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (PI.f64))))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))) #s(literal -1 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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) (neg.f64 (PI.f64)))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (PI.f64))
(/.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(/.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(/.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (PI.f64))
(/.f64 (neg.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (PI.f64))
(/.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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))))
(neg.f64 (/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))) (PI.f64)))
(neg.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) (neg.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (/.f64 #s(literal 180 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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (/.f64 #s(literal 180 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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (cbrt.f64 (PI.f64))))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64)))))
(*.f64 (*.f64 #s(literal -180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 1 binary64) (sqrt.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) (/.f64 #s(literal 1 binary64) (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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 180 binary64) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (sqrt.f64 (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))))
(*.f64 #s(literal 180 binary64) (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (PI.f64)))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 180 binary64) (PI.f64))))
(pow.f64 (/.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 180 binary64) (PI.f64)))) #s(literal -1 binary64))
(/.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(/.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) #s(literal 1 binary64)) (PI.f64))
(/.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64)))) #s(literal 1 binary64)) (sqrt.f64 (PI.f64)))
(/.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64))))) #s(literal 1 binary64)) (neg.f64 (PI.f64)))
(/.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) #s(literal 1 binary64)) (PI.f64))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (PI.f64))) (/.f64 (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64))))))
(/.f64 (*.f64 #s(literal -180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64))))) (neg.f64 (PI.f64)))
(/.f64 (*.f64 #s(literal -180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (sqrt.f64 (PI.f64)))) (neg.f64 (sqrt.f64 (PI.f64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64)))) (neg.f64 (neg.f64 (sqrt.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64)))) (sqrt.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) (PI.f64))
(/.f64 #s(literal 1 binary64) (/.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) #s(literal 180 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 180 binary64) (PI.f64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 180 binary64) (PI.f64)))))
(neg.f64 (/.f64 (*.f64 #s(literal -180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (sqrt.f64 (PI.f64)))) (sqrt.f64 (PI.f64))))
(neg.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64)))) (neg.f64 (sqrt.f64 (PI.f64)))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))) (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y-scale #s(literal 2 binary64))) (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 (-.f64 b a) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))) (/.f64 #s(literal -1/2 binary64) (+.f64 b a)))
(*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))
(*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))))
(*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))) (/.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))) (*.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64))
(*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal -1/2 binary64)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #s(literal -1/2 binary64)) (*.f64 (-.f64 b a) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))) (+.f64 b a))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #s(literal -1/2 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))) (*.f64 (+.f64 b a) (-.f64 b a)))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #s(literal -1/2 binary64)) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #s(literal -1/2 binary64)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))) #s(literal -1/2 binary64)) (*.f64 (+.f64 b a) (-.f64 b a)))
(/.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale)) #s(literal -1/2 binary64)) (*.f64 (neg.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))))) (*.f64 (+.f64 b a) (-.f64 b a)))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale))) (*.f64 (neg.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #s(literal -1/2 binary64))) (*.f64 (neg.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))
(/.f64 (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))
(/.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #s(literal -1/2 binary64))))
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/180 binary64) angle)) (PI.f64))
(*.f64 (*.f64 #s(literal 2 binary64) (PI.f64)) (*.f64 #s(literal 1/180 binary64) angle))
(*.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) #s(literal 1/180 binary64))
(*.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)) #s(literal 2 binary64))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(*.f64 #s(literal 1/180 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))
(*.f64 (*.f64 #s(literal 1/180 binary64) angle) (*.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (PI.f64) (*.f64 (*.f64 #s(literal 1/180 binary64) angle) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) #s(literal 180 binary64))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) #s(literal 1/4 binary64)))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))
(pow.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
(pow.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) #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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) #s(literal 1/4 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) #s(literal 1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)))
#s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64))))
(*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))
(/.f64 (neg.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) (neg.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))
(/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))
(tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))
(*.f64 (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal -2 binary64)) (/.f64 y-scale x-scale))
(*.f64 (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (/.f64 y-scale x-scale)) #s(literal -2 binary64))
(*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))
(*.f64 (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)) (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))
(*.f64 (/.f64 y-scale x-scale) (*.f64 #s(literal -2 binary64) (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))
(*.f64 #s(literal -2 binary64) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (/.f64 y-scale x-scale)))
(/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64))) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))
(/.f64 (*.f64 (*.f64 #s(literal -2 binary64) y-scale) (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) x-scale)
(/.f64 (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(literal -2 binary64) y-scale)) x-scale)
(/.f64 (*.f64 (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))
(/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(literal -2 binary64) y-scale)) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) x-scale))
(/.f64 (*.f64 (*.f64 #s(literal -2 binary64) y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) x-scale))
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))
(*.f64 (/.f64 y-scale (*.f64 x-scale (PI.f64))) (/.f64 #s(literal 1 binary64) angle))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (PI.f64)) angle)) y-scale)
(*.f64 (neg.f64 y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 angle) (*.f64 x-scale (PI.f64)))))
(*.f64 y-scale (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (PI.f64)) angle)))
(*.f64 #s(literal 1 binary64) (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)))
(pow.f64 (/.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) y-scale) #s(literal -1 binary64))
(/.f64 (/.f64 y-scale angle) (*.f64 x-scale (PI.f64)))
(/.f64 (/.f64 y-scale (PI.f64)) (*.f64 x-scale angle))
(/.f64 (neg.f64 (/.f64 y-scale (*.f64 x-scale (PI.f64)))) (neg.f64 angle))
(/.f64 (neg.f64 (neg.f64 y-scale)) (neg.f64 (*.f64 (neg.f64 angle) (*.f64 x-scale (PI.f64)))))
(/.f64 (*.f64 y-scale #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (PI.f64)) angle))
(/.f64 (/.f64 y-scale (*.f64 x-scale (PI.f64))) angle)
(/.f64 (neg.f64 y-scale) (*.f64 (neg.f64 angle) (*.f64 x-scale (PI.f64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) y-scale)))
(/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle))
(/.f64 #s(literal 1 binary64) (/.f64 angle (/.f64 y-scale (*.f64 x-scale (PI.f64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) y-scale) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) y-scale))
(neg.f64 (/.f64 (neg.f64 y-scale) (*.f64 (*.f64 x-scale (PI.f64)) angle)))
(neg.f64 (/.f64 y-scale (*.f64 (neg.f64 angle) (*.f64 x-scale (PI.f64)))))
(*.f64 (*.f64 x-scale (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (*.f64 x-scale (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(*.f64 (*.f64 x-scale #s(literal 1 binary64)) (PI.f64))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) x-scale))
(*.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) x-scale))
(*.f64 x-scale (PI.f64))
(*.f64 (PI.f64) x-scale)
(*.f64 #s(literal 1 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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))
#s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64)))
(*.f64 (/.f64 x-scale (*.f64 y-scale (PI.f64))) (/.f64 #s(literal 1 binary64) angle))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale (PI.f64)) angle)) x-scale)
(*.f64 (neg.f64 x-scale) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 angle) (*.f64 y-scale (PI.f64)))))
(*.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale (PI.f64)) angle)))
(*.f64 #s(literal 1 binary64) (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)))
(pow.f64 (/.f64 (*.f64 (*.f64 y-scale (PI.f64)) angle) x-scale) #s(literal -1 binary64))
(/.f64 (/.f64 x-scale angle) (*.f64 y-scale (PI.f64)))
(/.f64 (/.f64 x-scale (PI.f64)) (*.f64 y-scale angle))
(/.f64 (neg.f64 (/.f64 x-scale (*.f64 y-scale (PI.f64)))) (neg.f64 angle))
(/.f64 (neg.f64 (neg.f64 x-scale)) (neg.f64 (*.f64 (neg.f64 angle) (*.f64 y-scale (PI.f64)))))
(/.f64 (*.f64 x-scale #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (PI.f64)) angle))
(/.f64 (/.f64 x-scale (*.f64 y-scale (PI.f64))) angle)
(/.f64 (neg.f64 x-scale) (*.f64 (neg.f64 angle) (*.f64 y-scale (PI.f64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 y-scale (PI.f64)) angle) x-scale)))
(/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle))
(/.f64 #s(literal 1 binary64) (/.f64 angle (/.f64 x-scale (*.f64 y-scale (PI.f64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 y-scale (PI.f64)) angle) x-scale) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 y-scale (PI.f64)) angle) x-scale))
(neg.f64 (/.f64 (neg.f64 x-scale) (*.f64 (*.f64 y-scale (PI.f64)) angle)))
(neg.f64 (/.f64 x-scale (*.f64 (neg.f64 angle) (*.f64 y-scale (PI.f64)))))
(*.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (-.f64 b a) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (+.f64 b a)))
(*.f64 (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (-.f64 b a) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))) (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (+.f64 b a)))
(*.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))))
(*.f64 (/.f64 y-scale (*.f64 (-.f64 b a) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))) (/.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (+.f64 b a)))
(*.f64 (/.f64 y-scale (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (/.f64 y-scale (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))))
(*.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))
(*.f64 (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))
(*.f64 (/.f64 y-scale (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))
(*.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale #s(literal 2 binary64)))
(*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))))
(*.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))))
(*.f64 (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))) (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (*.f64 y-scale #s(literal 2 binary64)) (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))))
(*.f64 y-scale (/.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a)))))
(*.f64 y-scale (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))))
(*.f64 y-scale (*.f64 #s(literal 2 binary64) (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))))
(*.f64 #s(literal 2 binary64) (*.f64 y-scale (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))))
(*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))))
(pow.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) #s(literal -1 binary64))
(/.f64 (/.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))) (+.f64 b a)) (-.f64 b a))
(/.f64 (/.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))) (-.f64 b a)) (+.f64 b a))
(/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (/.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 (+.f64 b a) (-.f64 b a)))
(/.f64 (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))
(/.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 (-.f64 b a) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))) (+.f64 b a))
(/.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))
(/.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))))) (neg.f64 (*.f64 (+.f64 b a) (-.f64 b a))))
(/.f64 (neg.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale))) (neg.f64 (*.f64 (neg.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
(/.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))) (*.f64 (+.f64 b a) (-.f64 b a)))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale)) (*.f64 (neg.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))))))
(/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))))
(neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a)))))
(neg.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 (neg.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a)))))
#s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 1 binary64))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) #s(literal 1 binary64)))
(*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) (-.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))
(/.f64 (-.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) #s(literal 1/4 binary64)))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) #s(literal 1/4 binary64)))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (*.f64 (neg.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))
(fma.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (exp.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))
(fma.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))
(fma.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(cos.f64 (fma.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))

eval1.4s (0.9%)

Memory
47.2MiB live, 4 583.9MiB allocated
Compiler

Compiled 370 099 to 6 608 computations (98.2% saved)

prune18.9s (12.6%)

Memory
58.5MiB live, 58 090.2MiB allocated
Pruning

78 alts after pruning (75 fresh and 3 done)

PrunedKeptTotal
New2 242432 285
Fresh473279
Picked325
Done011
Total2 292782 370
Accuracy
87.0%
Counts
2 370 → 78
Alt Table
Click to see full alt table
StatusAccuracyProgram
37.9%
(/.f64 (/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
34.0%
(/.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 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #s(literal -1/2 binary64)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
25.8%
(/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
44.5%
(/.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 (* (/ (* (* y-scale 2) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* a a)))) (* (* (* (cos (* (* (PI) angle) 1/180)) x-scale) (sin (* (* (PI) angle) 1/180))) (* (- b a) (+ b a)))) -1/2) (*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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)))))))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
31.9%
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (PI.f64))) (/.f64 (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64))))))
32.4%
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) (PI.f64))
14.8%
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #s(literal 180 binary64)) (PI.f64))
49.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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) (PI.f64))
38.4%
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (PI.f64))
27.8%
(/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) (PI.f64))
49.1%
(/.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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))))
38.0%
(/.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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64))))))))
48.0%
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) y-scale) (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) x-scale))))) (PI.f64)) #s(literal 180 binary64))
50.2%
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
51.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)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
49.2%
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) #s(literal 180 binary64))
46.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)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle))))))) (PI.f64)) #s(literal 180 binary64))
49.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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
47.0%
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (PI.f64)) #s(literal 180 binary64))
31.6%
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.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 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal -1/2 binary64)))) (sqrt.f64 (PI.f64))))
27.8%
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))))))) (sqrt.f64 (PI.f64))))
14.7%
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 x-scale (*.f64 y-scale (PI.f64))) angle) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
14.6%
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
✓14.6%
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
49.6%
(*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))))
49.1%
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))))) #s(literal 180 binary64))
49.5%
(*.f64 (*.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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))) #s(literal 180 binary64))
38.3%
(*.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (/.f64 #s(literal 1 binary64) (PI.f64)))
7.0%
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
45.0%
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
50.1%
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
48.9%
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))) #s(literal 180 binary64)))
49.2%
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) #s(literal 180 binary64)))
46.8%
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
49.6%
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
47.0%
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
12.2%
(*.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 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale 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))) (PI.f64)))
12.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 y-scale x-scale))) (PI.f64)))
11.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 y-scale x-scale))) (PI.f64)))
15.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 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (PI.f64) angle)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
14.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 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (-.f64 b a)) #s(literal 90 binary64)))) (PI.f64)))
15.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 (*.f64 (*.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) y-scale) x-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
29.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 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal -1/2 binary64)))) (PI.f64)))
27.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 #s(approx (sin (* (* (PI) angle) 1/180)) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)))
30.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 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)))
30.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 (*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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)))
15.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) y-scale))) x-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
11.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (*.f64 b (*.f64 b (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
2.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(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
26.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 (*.f64 (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal -1/2 binary64)))) (PI.f64)))
29.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 (*.f64 (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)))) #s(literal -1/2 binary64)))) (PI.f64)))
30.5%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)))) #s(literal -1/2 binary64)))) (PI.f64)))
7.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 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)))
13.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 #s(approx (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (*.f64 #s(literal -2 binary64) (*.f64 b b))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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)))
14.7%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))) #s(literal -1/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 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (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 (*.f64 b b) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) #s(literal -1/2 binary64)))) (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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))))))) #s(literal 90 binary64)))) (PI.f64)))
21.6%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))))) #s(literal 90 binary64)))) (PI.f64)))
40.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 y-scale (*.f64 x-scale (PI.f64))) angle) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
38.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 y-scale (PI.f64)) (*.f64 x-scale angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
38.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
37.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))
38.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))
✓38.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
38.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) y-scale)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
40.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 angle (/.f64 y-scale (*.f64 x-scale (PI.f64))))) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
40.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (*.f64 (/.f64 y-scale (*.f64 x-scale (PI.f64))) (/.f64 #s(literal 1 binary64) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
38.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (PI.f64)) angle)) y-scale) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
14.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)) y-scale))) #s(literal 90 binary64)))) (PI.f64)))
14.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))) #s(literal 90 binary64)))) (PI.f64)))
14.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 (*.f64 y-scale (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))))))) #s(literal 90 binary64)))) (PI.f64)))
✓14.8%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)))
14.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (PI.f64) y-scale) (/.f64 x-scale angle))))) #s(literal 90 binary64)))) (PI.f64)))
48.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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)))))) #s(literal -1/2 binary64)))) (PI.f64)))
45.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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
28.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 (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (/.f64 (*.f64 #s(literal -180 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))))) (PI.f64)))
44.9%
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (*.f64 (neg.f64 y-scale) (/.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))) x-scale)))))) (PI.f64)))
27.8%
(*.f64 #s(literal 180 binary64) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (/.f64 #s(literal 1 binary64) (PI.f64))))
Compiler

Compiled 13 556 to 3 540 computations (73.9% saved)

regimes524.0ms (0.3%)

Memory
11.5MiB live, 1 806.7MiB allocated
Counts
164 → 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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (neg.f64 x-scale) (*.f64 (*.f64 angle y-scale) (neg.f64 (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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (PI.f64)) angle)) y-scale) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 x-scale (*.f64 (PI.f64) y-scale)) angle))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 y-scale (PI.f64)) (*.f64 x-scale angle)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 y-scale (*.f64 x-scale (PI.f64))) angle) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(/.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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 (neg.f64 x-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle y-scale) (neg.f64 (PI.f64))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 x-scale angle) (/.f64 #s(literal 1 binary64) (*.f64 (PI.f64) y-scale))))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (*.f64 (/.f64 y-scale (*.f64 x-scale (PI.f64))) (/.f64 #s(literal 1 binary64) angle)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) y-scale)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)) y-scale))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (PI.f64) y-scale) (/.f64 x-scale angle))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 angle (/.f64 y-scale (*.f64 x-scale (PI.f64))))) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (/.f64 (*.f64 #s(literal -180 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 (*.f64 y-scale (sqrt.f64 (PI.f64))) (sqrt.f64 (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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) angle)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle))))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 x-scale (*.f64 y-scale (PI.f64))) angle) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))))))) (sqrt.f64 (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(approx (* (* a a) (+ (* -2 (/ (* (* b b) y-scale) (* (* a a) x-scale))) (* 2 (/ x-scale y-scale)))) (*.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -2 binary64))) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) y-scale))) x-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) y-scale) x-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 y-scale x-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (*.f64 b (*.f64 b (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (-.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (/.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) (-.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (PI.f64) angle)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (-.f64 b a)) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 a a))) #s(literal 2 binary64)))))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 b b) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) y-scale)) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (fma.f64 (/.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)))) y-scale))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) y-scale) (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) x-scale))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #s(literal 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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #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)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (/.f64 #s(literal 1 binary64) (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (*.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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))))) #s(literal 180 binary64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/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)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))) #s(literal 180 binary64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (sqrt.f64 (PI.f64))))
(/.f64 (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (*.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64))))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))) (*.f64 b b)))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 y-scale x-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 angle (*.f64 y-scale (PI.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)) #s(approx (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (*.f64 (neg.f64 y-scale) (/.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))) x-scale)))))) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) #s(literal 180 binary64))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) #s(literal 180 binary64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 y-scale (/.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))) x-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 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 180 binary64) (/.f64 (*.f64 y-scale (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 a b) (-.f64 b a))) #s(literal -1/8748000 binary64)))) (*.f64 x-scale (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))))) (*.f64 #s(literal 360 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) angle)) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (*.f64 #s(literal 2 binary64) (*.f64 b (-.f64 (/.f64 y-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 x-scale (PI.f64))))) (+.f64 (/.f64 x-scale (*.f64 (*.f64 a a) (*.f64 angle (*.f64 y-scale (PI.f64))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 angle (*.f64 y-scale (PI.f64))))))))))))) #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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (cbrt.f64 (PI.f64))))
(/.f64 (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(/.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 (* (/ (* (* y-scale 2) (+ (* (+ 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* b b)) (* (- 1/2 (* 1/2 (cos (* 2 (* (* (PI) angle) 1/180))))) (* a a)))) (* (* (* (cos (* (* (PI) angle) 1/180)) x-scale) (sin (* (* (PI) angle) 1/180))) (* (- b a) (+ b a)))) -1/2) (*.f64 (neg.f64 y-scale) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 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)))))))))) (sqrt.f64 (PI.f64))) (sqrt.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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) (PI.f64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 y-scale x-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (fma.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 b b) (*.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 a a))) (*.f64 #s(literal 2 binary64) (/.f64 y-scale (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))))) #s(literal -1/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)) (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64)))) #s(literal 180 binary64)) (PI.f64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 x-scale 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 x-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (-.f64 b a)) (+.f64 b a))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 y-scale x-scale))) (PI.f64)))
(/.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 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #s(literal -1/2 binary64)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (PI.f64))) (/.f64 (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/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 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) a) a (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (*.f64 y-scale #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale)) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1/2 binary64))))))
(/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) #s(approx (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64)))))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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 (*.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 -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (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)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) (/.f64 y-scale (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale))))) (/.f64 #s(literal 1 binary64) (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) y-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale)) (/.f64 y-scale (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (/.f64 (*.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) x-scale) (*.f64 (-.f64 b a) (+.f64 b a)))) (/.f64 y-scale (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) #s(literal -1/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 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale 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))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(/.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 y-scale #s(literal 2 binary64)) (fma.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 b b) (*.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 a a)))) (*.f64 (*.f64 (*.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) x-scale) (sin.f64 (*.f64 (*.f64 (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) angle) #s(literal 1/180 binary64)))) (*.f64 (-.f64 b a) (+.f64 b a)))) #s(literal -1/2 binary64))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64))) (*.f64 (*.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 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 #s(approx (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (*.f64 #s(literal -2 binary64) (*.f64 b b))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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 (/.f64 #s(literal 180 binary64) (sqrt.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 #s(literal 2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 (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 b a)) (-.f64 b a)))) #s(literal -1/2 binary64)))) (sqrt.f64 (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b 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 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 #s(literal 2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 #s(approx (sin (* (* (PI) angle) 1/180)) (*.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))) #s(literal 2 binary64))))) y-scale) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 angle angle)) (fma.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64) (fma.f64 (/.f64 (fma.f64 (*.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 x-scale x-scale)) #s(literal -1/32400 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 (PI.f64) b) (*.f64 (PI.f64) b)) (*.f64 y-scale y-scale)) #s(literal 1/32400 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 y-scale y-scale)) #s(literal -1/32400 binary64)))) (-.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 (PI.f64) (PI.f64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 1/8100 binary64))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) a) (*.f64 (PI.f64) a)) (*.f64 x-scale x-scale)) #s(literal 1/32400 binary64)))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) #s(literal 180 binary64) (*.f64 #s(literal -32400 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64)))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (PI.f64))) #s(literal 90 binary64))) angle))) (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 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (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(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (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 (*.f64 b b) (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-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))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-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 x-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.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 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 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)))))) x-scale) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 a a))) (*.f64 y-scale y-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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)))) (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 -1/2 binary64) y-scale) (/.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))))) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (-.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-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))))) #s(literal 1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (fma.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 x-scale x-scale))) (hypot.f64 (/.f64 (*.f64 (*.f64 (+.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 x-scale)) (-.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale)) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 b b) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 a a))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 b b))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale))))) #s(literal 4 binary64) (pow.f64 (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 y-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 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) #s(approx (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 a a) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64)))))))) (*.f64 (*.f64 x-scale (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 (*.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 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 (cos.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 3 binary64))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a #s(literal 0 binary64))) (*.f64 b (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 0 binary64) a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 b (*.f64 x-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 y-scale x-scale) (*.f64 y-scale x-scale)))) #s(literal 4 binary64) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 b b)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 #s(approx (cos (* (* (PI) angle) 1/180)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 (*.f64 a a) (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 #s(literal 4 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 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (fma.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 (*.f64 a a) (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 a b) (-.f64 b a)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale (/.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.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 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.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)))) (*.f64 (*.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 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (+.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (fma.f64 (*.f64 b b) (/.f64 (pow.f64 (sin.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 (pow.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 (cos.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))) x-scale) (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (+.f64 b a)) (-.f64 b a))))) #s(literal -1/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 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b #s(approx (sin (* (/ angle 180) (PI))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.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 #s(approx (sin (* (/ angle 180) (PI))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a #s(approx (cos (* (/ angle 180) (PI))) (fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)) #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 (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 #s(approx (cos (* (/ angle 180) (PI))) (fma.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)) #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)))) (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)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (-.f64 (pow.f64 (*.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (/.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a)))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (-.f64 b a)) (-.f64 b a)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 b b)) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) angle))) #s(literal 1/2 binary64))) (*.f64 a a))))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64))) (-.f64 b a)) (+.f64 b a)) (cos.f64 (*.f64 (*.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) x-scale)))) #s(literal -1/2 binary64)))) (PI.f64)))
Outputs
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))))
Calls

11 calls:

50.0ms
(/.f64 angle #s(literal 180 binary64))
49.0ms
x-scale
48.0ms
b
47.0ms
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
46.0ms
angle
Results
AccuracySegmentsBranch
67.1%2a
65.7%3b
56.1%3angle
60.6%6x-scale
60.1%5y-scale
57.8%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%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))
57.8%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)))
57.8%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))
56.1%3(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
56.1%3(/.f64 angle #s(literal 180 binary64))
Compiler

Compiled 733 to 215 computations (70.7% saved)

regimes48.0ms (0%)

Memory
-18.6MiB live, 184.0MiB allocated
Counts
98 → 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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (neg.f64 x-scale) (*.f64 (*.f64 angle y-scale) (neg.f64 (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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (PI.f64)) angle)) y-scale) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 x-scale (*.f64 (PI.f64) y-scale)) angle))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 y-scale (PI.f64)) (*.f64 x-scale angle)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 y-scale (*.f64 x-scale (PI.f64))) angle) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(/.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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 (neg.f64 x-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle y-scale) (neg.f64 (PI.f64))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 x-scale angle) (/.f64 #s(literal 1 binary64) (*.f64 (PI.f64) y-scale))))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (*.f64 (/.f64 y-scale (*.f64 x-scale (PI.f64))) (/.f64 #s(literal 1 binary64) angle)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) y-scale)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)) y-scale))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (PI.f64) y-scale) (/.f64 x-scale angle))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 angle (/.f64 y-scale (*.f64 x-scale (PI.f64))))) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (/.f64 (*.f64 #s(literal -180 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 (*.f64 y-scale (sqrt.f64 (PI.f64))) (sqrt.f64 (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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) angle)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle))))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 x-scale (*.f64 y-scale (PI.f64))) angle) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))))))) (sqrt.f64 (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(approx (* (* a a) (+ (* -2 (/ (* (* b b) y-scale) (* (* a a) x-scale))) (* 2 (/ x-scale y-scale)))) (*.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -2 binary64))) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) y-scale))) x-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) y-scale) x-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 y-scale x-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (*.f64 b (*.f64 b (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (-.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (/.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) (-.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (PI.f64) angle)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (-.f64 b a)) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 a a))) #s(literal 2 binary64)))))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 b b) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) y-scale)) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (fma.f64 (/.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)))) y-scale))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) y-scale) (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) x-scale))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #s(literal 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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #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)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (/.f64 #s(literal 1 binary64) (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (*.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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))))) #s(literal 180 binary64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/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)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))) #s(literal 180 binary64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (sqrt.f64 (PI.f64))))
(/.f64 (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (*.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64))))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))) (*.f64 b b)))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 y-scale x-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 angle (*.f64 y-scale (PI.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)) #s(approx (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (*.f64 (neg.f64 y-scale) (/.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))) x-scale)))))) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) #s(literal 180 binary64))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) #s(literal 180 binary64)))
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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))))
Calls

1 calls:

28.0ms
a
Results
AccuracySegmentsBranch
67.1%2a
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes46.0ms (0%)

Memory
4.6MiB live, 164.2MiB allocated
Counts
96 → 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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (neg.f64 x-scale) (*.f64 (*.f64 angle y-scale) (neg.f64 (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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (PI.f64)) angle)) y-scale) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 x-scale (*.f64 (PI.f64) y-scale)) angle))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 y-scale (PI.f64)) (*.f64 x-scale angle)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 y-scale (*.f64 x-scale (PI.f64))) angle) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(/.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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 (neg.f64 x-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle y-scale) (neg.f64 (PI.f64))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 x-scale angle) (/.f64 #s(literal 1 binary64) (*.f64 (PI.f64) y-scale))))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (*.f64 (/.f64 y-scale (*.f64 x-scale (PI.f64))) (/.f64 #s(literal 1 binary64) angle)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) y-scale)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)) y-scale))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (PI.f64) y-scale) (/.f64 x-scale angle))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 angle (/.f64 y-scale (*.f64 x-scale (PI.f64))))) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (/.f64 (*.f64 #s(literal -180 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 (*.f64 y-scale (sqrt.f64 (PI.f64))) (sqrt.f64 (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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) angle)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle))))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 x-scale (*.f64 y-scale (PI.f64))) angle) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))))))) (sqrt.f64 (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(approx (* (* a a) (+ (* -2 (/ (* (* b b) y-scale) (* (* a a) x-scale))) (* 2 (/ x-scale y-scale)))) (*.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -2 binary64))) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) y-scale))) x-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) y-scale) x-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 y-scale x-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (*.f64 b (*.f64 b (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (-.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (/.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) (-.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (PI.f64) angle)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (-.f64 b a)) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 a a))) #s(literal 2 binary64)))))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 b b) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) y-scale)) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (fma.f64 (/.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)))) y-scale))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) y-scale) (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) x-scale))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #s(literal 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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #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)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (/.f64 #s(literal 1 binary64) (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (*.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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))))) #s(literal 180 binary64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/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)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))) #s(literal 180 binary64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (sqrt.f64 (PI.f64))))
(/.f64 (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (*.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64))))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))) (*.f64 b b)))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 y-scale x-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 angle (*.f64 y-scale (PI.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)) #s(approx (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (*.f64 (neg.f64 y-scale) (/.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))) x-scale)))))) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))) #s(literal 180 binary64))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
Outputs
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (*.f64 (neg.f64 y-scale) (/.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))) x-scale)))))) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))))
Calls

1 calls:

27.0ms
a
Results
AccuracySegmentsBranch
67.1%2a
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes71.0ms (0%)

Memory
17.0MiB live, 256.8MiB allocated
Counts
92 → 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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (neg.f64 x-scale) (*.f64 (*.f64 angle y-scale) (neg.f64 (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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (PI.f64)) angle)) y-scale) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 x-scale (*.f64 (PI.f64) y-scale)) angle))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 y-scale (PI.f64)) (*.f64 x-scale angle)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 y-scale (*.f64 x-scale (PI.f64))) angle) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(/.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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 (neg.f64 x-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle y-scale) (neg.f64 (PI.f64))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 x-scale angle) (/.f64 #s(literal 1 binary64) (*.f64 (PI.f64) y-scale))))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (*.f64 (/.f64 y-scale (*.f64 x-scale (PI.f64))) (/.f64 #s(literal 1 binary64) angle)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) y-scale)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)) y-scale))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (PI.f64) y-scale) (/.f64 x-scale angle))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 angle (/.f64 y-scale (*.f64 x-scale (PI.f64))))) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (/.f64 (*.f64 #s(literal -180 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 (*.f64 y-scale (sqrt.f64 (PI.f64))) (sqrt.f64 (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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) angle)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle))))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 x-scale (*.f64 y-scale (PI.f64))) angle) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))))))) (sqrt.f64 (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(approx (* (* a a) (+ (* -2 (/ (* (* b b) y-scale) (* (* a a) x-scale))) (* 2 (/ x-scale y-scale)))) (*.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -2 binary64))) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) y-scale))) x-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) y-scale) x-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 y-scale x-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (*.f64 b (*.f64 b (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (-.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (/.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) (-.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (PI.f64) angle)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (-.f64 b a)) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 a a))) #s(literal 2 binary64)))))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 b b) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) y-scale)) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (fma.f64 (/.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)))) y-scale))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) y-scale) (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) x-scale))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) #s(literal 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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #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)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (/.f64 #s(literal 1 binary64) (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (*.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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))))) #s(literal 180 binary64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/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)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))) #s(literal 180 binary64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (sqrt.f64 (PI.f64))))
(/.f64 (/.f64 (*.f64 #s(literal 180 binary64) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))))))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 y-scale #s(approx (sin (* 1/180 (* angle (PI)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (+.f64 (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 a (*.f64 angle (*.f64 y-scale (PI.f64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) (*.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 y-scale (*.f64 #s(literal 0 binary64) a)) (*.f64 angle (*.f64 b (*.f64 x-scale (PI.f64))))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 y-scale (*.f64 (*.f64 #s(literal 0 binary64) a) (*.f64 #s(literal 0 binary64) a))) (*.f64 angle (*.f64 x-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 a a) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))))) (*.f64 b b)))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.f64 (/.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/180 binary64) angle)))))) (*.f64 y-scale x-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 x-scale (*.f64 #s(literal 0 binary64) b)) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (PI.f64)))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 #s(literal 0 binary64) b) (*.f64 #s(literal 0 binary64) b))) (*.f64 angle (*.f64 y-scale (PI.f64)))) (/.f64 (*.f64 (*.f64 b b) x-scale) (*.f64 angle (*.f64 y-scale (PI.f64)))))) a))) a)))) #s(literal 90 binary64)))) (PI.f64)))
Outputs
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (PI.f64))
(*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))))
Calls

2 calls:

27.0ms
a
26.0ms
b
Results
AccuracySegmentsBranch
59.8%2b
61.9%2a
Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes31.0ms (0%)

Memory
12.3MiB live, 90.9MiB allocated
Counts
67 → 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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (neg.f64 x-scale) (*.f64 (*.f64 angle y-scale) (neg.f64 (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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (PI.f64)) angle)) y-scale) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 x-scale (*.f64 (PI.f64) y-scale)) angle))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 y-scale (PI.f64)) (*.f64 x-scale angle)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 y-scale (*.f64 x-scale (PI.f64))) angle) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(/.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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 (neg.f64 x-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle y-scale) (neg.f64 (PI.f64))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 x-scale angle) (/.f64 #s(literal 1 binary64) (*.f64 (PI.f64) y-scale))))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (*.f64 (/.f64 y-scale (*.f64 x-scale (PI.f64))) (/.f64 #s(literal 1 binary64) angle)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale (PI.f64)) angle) y-scale)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 (/.f64 x-scale angle) (PI.f64)) y-scale))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (PI.f64) y-scale) (/.f64 x-scale angle))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 angle (/.f64 y-scale (*.f64 x-scale (PI.f64))))) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (/.f64 (*.f64 #s(literal -180 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 (*.f64 y-scale (sqrt.f64 (PI.f64))) (sqrt.f64 (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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) angle)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 y-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 angle y-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (*.f64 (*.f64 (*.f64 b b) y-scale) #s(literal -2 binary64)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 y-scale #s(approx (/ (+ (* (/ (+ (* (* -2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) (* (/ (* (* (* (* (+ b a) (- b a)) (* (+ b a) (- b a))) (pow (sin (* (* (PI) angle) 1/180)) 2)) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* y-scale y-scale)) 4)) (+ (* (* b b) (/ (pow (sin (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))) (* (* a a) (/ (pow (cos (* (* (PI) angle) 1/180)) 2) (* y-scale y-scale))))) 1/2) (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (*.f64 b b)) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))))) #s(literal -1/2 binary64)))) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle))))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) x-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 1/17496000 binary64)) (*.f64 angle angle) (*.f64 (PI.f64) #s(literal 1/180 binary64))) angle))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 x-scale (*.f64 y-scale (PI.f64))) angle) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) y-scale))))))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 b y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64))) y-scale) angle)) #s(literal -2 binary64)))))) (sqrt.f64 (PI.f64))))
(*.f64 (/.f64 #s(literal 180 binary64) (sqrt.f64 (PI.f64))) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale)) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a)))))))) (sqrt.f64 (PI.f64))))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) #s(approx (* (* a a) (+ (* -2 (/ (* (* b b) y-scale) (* (* a a) x-scale))) (* 2 (/ x-scale y-scale)))) (*.f64 (fma.f64 (*.f64 (*.f64 a a) (/.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -2 binary64))) y-scale))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 x-scale x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) y-scale) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) y-scale))) x-scale)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 b a) (+.f64 b a)) (*.f64 (PI.f64) angle)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) y-scale) x-scale) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (*.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 y-scale)) (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* x-scale x-scale))) (sqrt (+ (* (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale)) (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle))))) (* y-scale x-scale))) (* (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))) (- (/ (+ (* (- 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* a a)) (* (+ 1/2 (* 1/2 (cos (* 2 (* (PI) (* 1/180 angle)))))) (* b b))) (* 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 y-scale))))))) (* (* (+ b a) (- b a)) (sin (* 2 (* (PI) (* 1/180 angle)))))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) (*.f64 y-scale x-scale))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (*.f64 b (*.f64 b (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)))) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (*.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) y-scale) (*.f64 (*.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (/.f64 (*.f64 (*.f64 y-scale #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (-.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (/.f64 (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale)))) (-.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) (fma.f64 a (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (neg.f64 b) (/.f64 b (*.f64 x-scale x-scale))))) (*.f64 (PI.f64) angle)) (*.f64 (-.f64 b a) (+.f64 b a))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (/.f64 (/.f64 #s(approx (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (*.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (*.f64 b b)) (/.f64 y-scale (*.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 x-scale y-scale) #s(literal 2 binary64))) (*.f64 a a))) (*.f64 (*.f64 (PI.f64) angle) (+.f64 b a))) (-.f64 b a)) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (*.f64 (*.f64 b (/.f64 (-.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle))) (*.f64 a a))) #s(literal 2 binary64)))))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 b b) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (*.f64 y-scale y-scale) (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 angle (*.f64 x-scale (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 a a) x-scale) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 a b) (-.f64 b a))))))) y-scale)) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (/.f64 (fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 angle x-scale) (*.f64 (*.f64 (PI.f64) (+.f64 b a)) (-.f64 b a))))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) x-scale) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) angle) (*.f64 (-.f64 b a) (+.f64 b a))))) y-scale)) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))) (*.f64 b #s(approx (+ (* -2 (/ (* x-scale (* 0 a)) (* (* a a) (* angle (* y-scale (PI)))))) (* 2 (* b (- (/ y-scale (* (* a a) (* angle (* x-scale (PI))))) (+ (/ x-scale (* (* a a) (* angle (* y-scale (PI))))) (/ (* x-scale (* (* 0 a) (* 0 a))) (* (pow a 4) (* angle (* y-scale (PI)))))))))) (/.f64 (fma.f64 (/.f64 (*.f64 b (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (*.f64 (PI.f64) x-scale))) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 b x-scale)) (*.f64 (*.f64 (*.f64 a a) angle) (PI.f64)))) y-scale))))) #s(literal 90 binary64)))) (PI.f64)))
Outputs
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (PI.f64))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
Calls

1 calls:

19.0ms
a
Results
AccuracySegmentsBranch
60.6%2a
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes11.0ms (0%)

Memory
-6.8MiB live, 35.3MiB allocated
Counts
21 → 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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (neg.f64 x-scale) (*.f64 (*.f64 angle y-scale) (neg.f64 (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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (PI.f64)) angle)) y-scale) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (/.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 x-scale angle) (*.f64 (PI.f64) y-scale)))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 x-scale (*.f64 (PI.f64) y-scale)) angle))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 y-scale (PI.f64)) (*.f64 x-scale angle)) #s(literal -2 binary64))) #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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 (/.f64 y-scale (*.f64 x-scale (PI.f64))) angle) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(/.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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 (neg.f64 x-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle y-scale) (neg.f64 (PI.f64))))))) #s(literal 90 binary64)))) (PI.f64)))
Outputs
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64))
Calls

1 calls:

7.0ms
a
Results
AccuracySegmentsBranch
60.6%2a
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes8.0ms (0%)

Memory
-16.3MiB live, 23.3MiB allocated
Counts
13 → 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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (neg.f64 x-scale) (*.f64 (*.f64 angle y-scale) (neg.f64 (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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (PI.f64)) angle)) y-scale) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 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) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
(*.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (/.f64 #s(literal 1 binary64) (PI.f64)))
Outputs
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (PI.f64))
(*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)))
Calls

1 calls:

5.0ms
a
Results
AccuracySegmentsBranch
59.9%2a
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes6.0ms (0%)

Memory
19.7MiB live, 19.7MiB allocated
Counts
10 → 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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 y-scale (PI.f64)) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 (neg.f64 x-scale) (*.f64 (*.f64 angle y-scale) (neg.f64 (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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (*.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) y-scale) angle))))) #s(literal 90 binary64)))) (PI.f64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (PI.f64)) angle)) y-scale) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)))
Outputs
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (PI.f64)) #s(literal 180 binary64))
Calls

1 calls:

4.0ms
a
Results
AccuracySegmentsBranch
59.9%2a
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes4.0ms (0%)

Memory
-24.5MiB live, 15.2MiB allocated
Counts
5 → 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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (PI.f64)) #s(literal 180 binary64))
(/.f64 (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64)))))) #s(literal 180 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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))) #s(literal 90 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (PI.f64)) #s(literal 180 binary64))
Calls

1 calls:

3.0ms
a
Results
AccuracySegmentsBranch
59.9%2a
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes27.0ms (0%)

Memory
17.6MiB live, 97.9MiB allocated
Counts
3 → 1
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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)))
Calls

11 calls:

3.0ms
(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)))
2.0ms
(/.f64 angle #s(literal 180 binary64))
2.0ms
(/.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))
2.0ms
(/.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))
2.0ms
(*.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)))
Results
AccuracySegmentsBranch
38.3%1x-scale
38.3%1angle
38.3%1(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
38.3%1(/.f64 angle #s(literal 180 binary64))
38.3%1y-scale
38.3%1(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
38.3%1(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
38.3%1(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
38.3%1(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
38.3%1b
38.3%1a
Compiler

Compiled 733 to 215 computations (70.7% saved)

regimes20.0ms (0%)

Memory
-3.4MiB live, 76.1MiB allocated
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
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)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)))
Calls

11 calls:

2.0ms
(/.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))
2.0ms
(/.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))
2.0ms
(*.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)))
2.0ms
(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)))
2.0ms
(/.f64 angle #s(literal 180 binary64))
Results
AccuracySegmentsBranch
14.8%1y-scale
14.8%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)))
14.8%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))
14.8%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)))
14.8%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))
14.8%1a
14.8%1angle
14.8%1(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
14.8%1(/.f64 angle #s(literal 180 binary64))
14.8%1x-scale
14.8%1b
Compiler

Compiled 733 to 215 computations (70.7% saved)

bsearch74.0ms (0%)

Memory
18.5MiB live, 216.6MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
66.0ms
7.705718068082556e-48
3.0230367584652235e-47
Samples
24.0ms24×1valid
16.0ms14×2valid
16.0ms39×0valid
5.0ms3×3valid
Compiler

Compiled 492 to 283 computations (42.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 56.0ms
ival-pow2: 12.0ms (21.3% of total)
ival-mult: 9.0ms (16% of total)
ival-div: 9.0ms (16% of total)
ival-sin: 8.0ms (14.2% of total)
ival-cos: 8.0ms (14.2% of total)
adjust: 4.0ms (7.1% of total)
ival-sub: 3.0ms (5.3% of total)
ival-add: 2.0ms (3.5% of total)
ival-sqrt: 1.0ms (1.8% of total)
ival-pi: 1.0ms (1.8% of total)
ival-atan: 1.0ms (1.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch4.0ms (0%)

Memory
-32.3MiB live, 8.4MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
1.0ms
7.705718068082556e-48
3.0230367584652235e-47
Compiler

Compiled 482 to 273 computations (43.4% saved)

bsearch2.0ms (0%)

Memory
7.3MiB live, 7.3MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
1.0ms
7.705718068082556e-48
3.0230367584652235e-47
Compiler

Compiled 467 to 258 computations (44.8% saved)

bsearch2.0ms (0%)

Memory
8.0MiB live, 8.0MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
1.0ms
7.705718068082556e-48
3.0230367584652235e-47
Compiler

Compiled 432 to 248 computations (42.6% saved)

bsearch101.0ms (0.1%)

Memory
5.7MiB live, 326.3MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
93.0ms
4.39946012972984e-59
2.998245000836087e-58
Samples
38.0ms33×1valid
35.0ms26×2valid
10.0ms35×0valid
4.0ms2×3valid
1.0ms2×1exit
Compiler

Compiled 495 to 293 computations (40.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 80.0ms
ival-cos: 17.0ms (21.1% of total)
ival-pow2: 13.0ms (16.2% of total)
ival-mult: 12.0ms (14.9% of total)
ival-div: 12.0ms (14.9% of total)
ival-sin: 11.0ms (13.7% of total)
adjust: 6.0ms (7.5% of total)
ival-sub: 3.0ms (3.7% of total)
ival-add: 3.0ms (3.7% of total)
ival-sqrt: 2.0ms (2.5% of total)
ival-pi: 1.0ms (1.2% of total)
ival-atan: 1.0ms (1.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory
5.1MiB live, 5.1MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
1.0ms
4.39946012972984e-59
2.998245000836087e-58
Compiler

Compiled 483 to 281 computations (41.8% saved)

bsearch1.0ms (0%)

Memory
4.6MiB live, 4.6MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
1.0ms
4.39946012972984e-59
2.998245000836087e-58
Compiler

Compiled 483 to 281 computations (41.8% saved)

bsearch3.0ms (0%)

Memory
-34.7MiB live, 4.5MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
2.0ms
4.39946012972984e-59
2.998245000836087e-58
Compiler

Compiled 471 to 269 computations (42.9% saved)

bsearch1.0ms (0%)

Memory
4.3MiB live, 4.3MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
1.0ms
4.39946012972984e-59
2.998245000836087e-58
Compiler

Compiled 471 to 269 computations (42.9% saved)

simplify26.0ms (0%)

Memory
26.3MiB live, 66.1MiB allocated
Algorithm
1×egg-herbie
Rules
96×*-commutative_binary64
14×+-commutative_binary64
14×sub-neg_binary64
14×neg-sub0_binary64
14×neg-mul-1_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01954680
12464680
22534680
32624680
42754680
52844680
62904680
72924680
Stop Event
1×saturated
Calls
Call 1
Inputs
(if (<=.f64 a #s(literal 6170642089954523/205688069665150755269371147819668813122841983204197482918576128 binary64)) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))))
(if (<=.f64 a #s(literal 6170642089954523/205688069665150755269371147819668813122841983204197482918576128 binary64)) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))))
(if (<=.f64 a #s(literal 6170642089954523/205688069665150755269371147819668813122841983204197482918576128 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 (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (*.f64 (neg.f64 y-scale) (/.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))) x-scale)))))) (PI.f64))) (*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))))
(if (<=.f64 a #s(literal 6170642089954523/205688069665150755269371147819668813122841983204197482918576128 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (PI.f64)) (*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))))
(if (<=.f64 a #s(literal 2614933655872009/14134776518227074636666380005943348126619871175004951664972849610340958208 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (PI.f64)) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))))
(if (<=.f64 a #s(literal 2614933655872009/14134776518227074636666380005943348126619871175004951664972849610340958208 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)))
(if (<=.f64 a #s(literal 2614933655872009/14134776518227074636666380005943348126619871175004951664972849610340958208 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (PI.f64)) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))))
(if (<=.f64 a #s(literal 2614933655872009/14134776518227074636666380005943348126619871175004951664972849610340958208 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (PI.f64)) #s(literal 180 binary64)))
(if (<=.f64 a #s(literal 2614933655872009/14134776518227074636666380005943348126619871175004951664972849610340958208 binary64)) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))) #s(literal 90 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.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(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 binary64)))) (PI.f64)))
Outputs
(if (<=.f64 a #s(literal 6170642089954523/205688069665150755269371147819668813122841983204197482918576128 binary64)) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 y-scale (/.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))) x-scale))) #s(literal 2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))) (*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))))
(if (<=.f64 a #s(literal 6170642089954523/205688069665150755269371147819668813122841983204197482918576128 binary64)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64)) (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 (/.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))) x-scale)) y-scale) #s(literal 2 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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 180 binary64) (PI.f64))))
(if (<=.f64 a #s(literal 6170642089954523/205688069665150755269371147819668813122841983204197482918576128 binary64)) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) #s(literal -1/2 binary64)))) (PI.f64))) (*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))))
(if (<=.f64 a #s(literal 6170642089954523/205688069665150755269371147819668813122841983204197482918576128 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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) y-scale) (*.f64 (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) x-scale)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64)) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 180 binary64) (PI.f64))))
(if (<=.f64 a #s(literal 6170642089954523/205688069665150755269371147819668813122841983204197482918576128 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 (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (*.f64 (neg.f64 y-scale) (/.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))) x-scale)))))) (PI.f64))) (*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))))
(if (<=.f64 a #s(literal 6170642089954523/205688069665150755269371147819668813122841983204197482918576128 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)) #s(approx (* (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) -1/2) (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 (neg.f64 x-scale) (sin.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) y-scale)))) (PI.f64)) #s(literal 180 binary64)) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) 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 (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 180 binary64) (PI.f64))))
(if (<=.f64 a #s(literal 6170642089954523/205688069665150755269371147819668813122841983204197482918576128 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (PI.f64)) (*.f64 (/.f64 #s(literal 180 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(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (tan.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) (*.f64 (/.f64 y-scale x-scale) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))))
(if (<=.f64 a #s(literal 6170642089954523/205688069665150755269371147819668813122841983204197482918576128 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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #s(literal 180 binary64)) (PI.f64)) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) (tan.f64 (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 180 binary64) (PI.f64))))
(if (<=.f64 a #s(literal 2614933655872009/14134776518227074636666380005943348126619871175004951664972849610340958208 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (PI.f64)) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))))
(if (<=.f64 a #s(literal 2614933655872009/14134776518227074636666380005943348126619871175004951664972849610340958208 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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #s(literal 180 binary64)) (PI.f64)) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)))) #s(literal -1/2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))))
(if (<=.f64 a #s(literal 2614933655872009/14134776518227074636666380005943348126619871175004951664972849610340958208 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)) #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64)))))))) (PI.f64)) #s(literal 180 binary64)))
(if (<=.f64 a #s(literal 2614933655872009/14134776518227074636666380005943348126619871175004951664972849610340958208 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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #s(literal 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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) (*.f64 #s(approx (tan (* (* (PI) angle) 1/180)) (*.f64 (*.f64 (PI.f64) angle) #s(literal 1/180 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)))) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64)))
(if (<=.f64 a #s(literal 2614933655872009/14134776518227074636666380005943348126619871175004951664972849610340958208 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 180 binary64)) (PI.f64)) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))))
(if (<=.f64 a #s(literal 2614933655872009/14134776518227074636666380005943348126619871175004951664972849610340958208 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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #s(literal 180 binary64)) (PI.f64)) (*.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))) #s(literal -1/2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 180 binary64))))
(if (<=.f64 a #s(literal 2614933655872009/14134776518227074636666380005943348126619871175004951664972849610340958208 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 #s(literal 90 binary64) #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 x-scale (PI.f64)) angle)) #s(literal -2 binary64)))))) #s(literal 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (PI.f64)) #s(literal 180 binary64)))
(if (<=.f64 a #s(literal 2614933655872009/14134776518227074636666380005943348126619871175004951664972849610340958208 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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) #s(literal 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 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64)))
(if (<=.f64 a #s(literal 2614933655872009/14134776518227074636666380005943348126619871175004951664972849610340958208 binary64)) (*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))) #s(literal 90 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 #s(literal -1/2 binary64) #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale) #s(literal -1/90 binary64))))))) (PI.f64)) #s(literal 180 binary64)))
(if (<=.f64 a #s(literal 2614933655872009/14134776518227074636666380005943348126619871175004951664972849610340958208 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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64)) (*.f64 (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* 2 (+ (* (* b b) (pow (cos (* (* (PI) angle) 1/180)) 2)) (* (* a a) (pow (sin (* (* (PI) angle) 1/180)) 2)))) y-scale) (* (* x-scale (cos (* (* (PI) angle) 1/180))) (* (* (+ b a) (- b a)) (sin (* (* (PI) angle) 1/180))))) #s(approx (* (* -2 (/ y-scale x-scale)) (tan (* (* (PI) angle) 1/180))) (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) y-scale) angle) x-scale)))) #s(literal -1/2 binary64)))) (PI.f64)) #s(literal 180 binary64)))
(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))) #s(literal 90 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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 y-scale (*.f64 (*.f64 (PI.f64) x-scale) angle)) #s(literal -2 binary64))) #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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 #s(literal -2 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))) #s(literal 90 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 #s(approx (/ (* (* x-scale y-scale) (* 2 (- (/ (* a a) (* y-scale y-scale)) (/ (* b b) (* x-scale x-scale))))) (* (* (PI) angle) (* (+ b a) (- b a)))) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (PI.f64) y-scale) angle)) #s(literal -2 binary64))) #s(literal 90 binary64)))) (PI.f64)) #s(literal 180 binary64))

soundness1.2s (0.8%)

Memory
-2.9MiB live, 2 278.3MiB allocated
Rules
8 488×lower-*.f64
8 488×lower-*.f32
7 384×lower-*.f64
7 384×lower-*.f32
6 740×lower-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01423063
02023027
18392954
272362738
081382666
01614340764
15774336777
08489328828
03936444220
08078437641
0120087542
1426387497
0877085328
01684231
02574177
110263983
086973884
01823260910
16566259956
08531253800
Stop Event
1×fuel
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
Compiler

Compiled 997 to 555 computations (44.3% saved)

preprocess121.0ms (0.1%)

Memory
-22.8MiB live, 454.0MiB allocated
Remove

(abs b)

Compiler

Compiled 2 338 to 924 computations (60.5% saved)

end9.9s (6.6%)

Memory
-347.8MiB live, 17 622.8MiB allocated

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...